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CHAPITRE 1 PREFACE 


Lorsque nous avons reçu la proposition d’écrire ce livre, nous y 
avons répondu avec enthousiasme. 


Cet enthousiasme n’a fait que grandir lorsque nous avons connu les 
premières données techniques de notre nouvel ordinateur. Les 
premières heures que nous avons passé à essayer cet ordinateur 
quand nous l’avons reçu ont pleinement confirmé notre attente. 


Après un certain temps passé à l'utiliser, il nous est apparu 
évident que cet ordinateur était bien celui que beaucoup 
attendaient. 


Il convient en effet également au lycéen, au mathématicien, au 
débutant, à l'expert, aux personnes intéressées par un usage 
commercial, aux programmeurs BASIC, aux fanas de graphisme ou de 
son, etc. 


Son large champ d’applications se reflète d’ailleurs dans la 
diversité des thèmes abordés dans ce livre. Pour bien montrer qu’il 
ne s’agit pas de possibilités théoriques, nous avons enrichi le 
texte d’un grand nombre de programmes d’exemple prèts à tourner. 


Le seul conseil que nous souhaitions vous donner avant que vous ne 
commenciez la lecture de cet ouvrage est de ne pas oublier qu’un 
ordinateur doit être un bon camarade et qu'il vous sera 
reconnaissant si vous le manipulez avec soin! En ce qui nous 
concerne, nous n’avons pas eu de problème pendant tout le temps que 
nous nous en sommes servi. 


Les auteurs 


CHAPITRE 2 LE GRAPHISME 


2.1 INTRODUCTION 


Le graphisme est un des aspects les plus fascinants d’un 
ordinateur. C’est pourquoi les concepteurs de votre CPC ont accordé 
une telle importance à la partie graphique de votre ordinateur et 
l'ont doté des caractéristiques suivantes: 


Résolution de 640*200 points 

(=128 000 points) 

20, 40 ou 80 caractères sur 25 lignes 

16, 4 ou 2 couleurs pouvant être représentées 
simultanément 

27 couleurs différentes 

Instructions graphiques puissantes 

Technique de fenêtres 

Caractères auto-définis 

Caractères graphiques 


C’est par le développement de leurs possibilités graphiques que les 
ordinateurs sont devenus les instruments universellement utilisés 
qu’ils sont aujourd’hui. Nous décrirons dans ce chapitre les 
possibilités de votre CPC dans ce domaine. Nos explications 
théoriques seront toujours illustrées par des exemples pratiques 
mais il est bien évident que le meilleur moyen pour vous de 
parvenir à bien assimiler les notions décrites est de réaliser 
vous-même de petits programmes d'exemple et de les tester. 


2.2 LE GRAPHISME HAUTE-RESOLUTION - 
GRAPHIQUES À CONSULTER 


La résolution est un terme qu’on emploie pour comparer les 
possibilités graphiques des différents ordinateurs. Pour bien 
comprendre sa signification, reportons-nous au temps où le papier 
et le crayon régnaient encore sur le monde. Il est clair que vous 
pouvez faire des dessins beaucoup plus précis avec un crayon fin 
qu'avec un crayon à mine très épaisse. De même, plus la résolution 
de votre ordinateur est fine, plus vous pourrez réaliser des 
graphiques fins et précis. La résolution est en effet le nombre de 
points différents que vous pouvez appeler pour les allumer ou les 
éteindre. Votre CPC offre une grille de 640 points horizontalement 
sur 200 points verticalement. Vous pouvez donc fixer 128 000 
points. Ceci vous permet donc réellement de réaliser de beaux 
graphiques : courbes de fonction, histogrammes ou graphiques 
camembert et bien sûr aussi des dessins pour des jeux, etc. 


Vous trouverez dans la section suivante quatre programmes 
illustrant les possibilités graphiques de votre ordinateur. Tapez 
ces programmes et laissez-vous entrainer, simplement en tapant RUN 
dans le monde magique du graphisme. Lorsque vous vous serez lassés 
d'utiliser ces programmes, modifiez-les ou bien créez<n de 
nouveaux. Nous vous conseillons toutefois de bien lire auparavant 
ce chapitre en entier. 


2.2.1 GRAPHIQUES A CONSULTER 


Vous pouvez utiliser les programmes que nous vous présentons dans 
cette section pour créer des graphiques et les regarder ou les 
intégrer dans vos propres programmes. 


Le premier programme dessine un cercle d’après les paramètres 
d’origine, de rayon et de pas. Vous pouvez choisir de faire 
colorier le cercle seulement, ou bien l’intérieur du cercle ou au 
contraire le fond de l'écran. Si le pas est trop grand, il est 
possible que le cercle ou le fond ne soient pas entièrement 
remplis. 


10 MODE 2 
20 INPUT"Origine (X)"5x 


30 INPUT'Origine (Y)":y 

40 INPUT"Rayon (R)"3;r 

50 INPUT'Pas (P)":s 

60 INPUT'Remplir ‘F'ond ou ‘C'ercle":a$ 
70 CLS 

80 2=(1 AND a$="f")+(2 AND a$="c") 

90 ORIGIN x,y 

100 FOR n=1 TO 360 STEP 5 

110 ex=ex+i 

120 xp=r#C05 (n) 

130 yp=r#SIN(n) 

140 PLOT xp,yp,i 

150 IF yp=ABS(yp) THEN ey=400-y ELSE ey=y-400 
160 IF xp=ABS(xp) THEN ex=640-x ELSE ex=x-640 
170 IF z=1 THEN DRAM xp,ey 

180 IF 2=1 THEN PLOT xp,yp:DRAN ex, yp 
190 IF 2=2 THEN MOVE 0,0: DRAW xp,yp 
200 NEXT 

210 IF 2C>1 THEN GOTO 280 

220 FOR n=r TO 640-x 

230 MOVE n,0:DRAW n,400-y 

240 MOVE -n,0:DRAH -n,400-y 

250 MOVE n,0:DRAH n,y-400 

260 MOVE -n,0:DRAW -n,y-400 

270 NEXT 

280 a$=INKEY$:1F a$="" THEN 280 

290 RUN 


Exemple : Origine (x)  —=320 
Origine (y)  =200 
Rayon =30 
Pas =0.5 


Le deuxième graphique est un pseudo-graphique en 3 dimensions. 
Suivant l’imagination de chacun, on peut y voir une pyramide vue 
d'en haut, un couloir ou une toile d’araignée. Une modification 
minime du programme suffit à créer une image entièrement nouvelle. 


10 MODE 2 

20 ORIGIN 320,200 

30 FOR t=0 TO 180 STEP 10 
40 PLOT a,t:DRAW t, -a 

54 PLOT -a,t:DRAW -t, -a 
60 PLOT 180,180: DRA4 0,0 
70 PLOT -180,190:DRAW 0,0 
80 PLOT a,t:DRAW -a,t 

90 PLOT 180,-180:DRAW 0,0 
100 PLOT -180,-180:DRAW 0,0 
110 PLOT -t,-a: DRAM t,-a 
120 a=a+10 

130 NEXT t 


Si vous modifiez par exemple la ligne 30 ainsi : 
30 FOR T=180 TO O0 STEP -10 


vous obtenez déjà une image très différente. Si vous faites 
quelques expériences avec ce programme, vous arriverez à des 
résultats étonnants. 


Le troisième graphique est appelé kaléidoscope pour une raison que 
vous comprendrez dès que vous aurez lancé le programme. Ce 
programme utilise une fonction de hasard qui permet d'arriver à des 
graphiques très intéressants. 


10 MODE 2 

20 DEF FN f(x)=INT (RND(1)#x)+1 
30 FOR x=1 T0 400 STEP EN #(25)+5 
40 PLOT x,0:DRAW 400,x 

50 PLOT 0,x:DRAW x ,400 

60 PLOT x,0:DRA4 0,400-x 

70 PLOT 400,x:DRAH 400-x,400 
80 PLOT x,0:DRAW 400-x,400 

90 PLOT 400,x:DRAW 0,400-x 

100 NEXT 

110 LOCATE 55,1 

120 PRINT “encore une fois?" 
130 a$=INKEYS:IF a$="" THEN 130 
140 IF a$="o" THEN RUN 

150 END 


Le quatrième graphique est une courbe sinusoïdale. Le programme 
vous demande d'indiquer le pas, puis il trace une courbe 
sinusoïdale non pas avec des points, mais avec des lignes qui vont 
d'un point (0,200) au point actuel de la courbe sinusoïdale. 
L'image ainsi réalisée est en pseudo 3 dimensions grâce à 
l'illusion optique provoquée par la superposition des lignes. 


10 REM courbe sinusoidale 
20 DEG 

30 CLE 

40 INPUT"Pas "3s 

50 DEF FN #(x)=SIN(x) 

60 FOR n=i TO 440 STEP 5 
70 x=x+(s#1.125) 

80 MOVE 0,200 

90 DRAW n,200+FN f (x) #200 
100 NEXT n 

110 a$=INKEYS:IF a$="" THEN 110 
120 RUN 
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Essayez ce programme également avec COS(x), -COS(x) ou -SIN(x). 
Bien entendu, ce qu’on appelle l’art informatique n’est pas la 
seule application de la haute résolution de votre CPC. Vous pouvez 
aussi réaliser grâce à un programme votre propre blason, le faire 
éditer sur une imprimante pour l’accrocher à la porte de votre 
château imaginaire (il y a bien sûr aussi des applications plus 
sérieuses). 


Si vous êtes très axé sur les maths, celà vous sera certainement 
très utile de pouvoir faire dessiner par votre ordinateur la courbe 
de n’importe quelle fonction. 


Si vous souhaitez un jour développer vos propres programmes (par 
exemple des programmes de gestion), la haute résolution vous sera 
très utile pour représenter par exemple les taux de croissance de 
votre affaire au cours des 12 derniers mois. 


Toutes ces applications seraient hors de portée si votre ordinateur 


avait une résolution aussi faible que malheureusement la pluspart 
des autres microordinateurs. 
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2.2.2 FIGURES LISSAJOUS 


Jules Antoine Lissajous, physicien français qui a vécu de 1822 à 
1880 a étudié le mouvement de particules soumises à des mouvements 
périodiques. Il a découvert que les corps soumis à de tels 
mouvements se déplacent suivant des courbes différentes. 

Nous avons écrit un programme qui vous montrera l’apparence qu’ont 
ces courbes. 

Après avoir lancé le programme, vous devez entrer trois paramètres: 

1) Fréquence YŸ: ce paramètre doit être compris entre 0 et 20 

2) Fréquence X: ce paramètre doit être compris entre 0 et 20 

3) Nombre de pas: cette valeur indique combien de points doivent 
être tracés. 


10 REM fiqures Lissajous 

20 MODE 0 

30 INPUT “Frequence Ÿ":y 

40 INPUT'Frequence X";x 

50 INPUT'Nombre de pas":s 

60 CLS 

70 FOR a=0 TO 2#PI/5 

80 PLOT 150*SIN(a#x)+150,100*C08 (aky) +100, 1 
90 NEXT 

100 END 


Commentaire du listing: 


10 Titre 

20 Fixation du mode d’écran 
30 Entrée de la fréquence Y 
40 Entrée de la fréquence X 
50 Entrée du nombre de pas 
60 Vidage de l’écran 

70 Ouverture d’une boucle 
80 Tracé des points 

90 Fermeture de la boucle 
100 Fin du programme 
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2.3 EDITEUR GRAPHIQUE 


Pour utiliser ce programme, il faut que vous ayez un joystick 
(manche à balai) compatible avec un ATARI. 


Après avoir lancé le programme, vous pouvez déplacer sur l’écran un 
petit point, le curseur graphique, au moyen du joystick. Après 
avoir appuyé sur la touche espace, vous pouvez tracer des lignes 
que vous pouvez effacer ensuite en appuyant d’abord sur la touche 
espace puis en passant sur les lignes à effacer avec le curseur 
graphique. Pour effacer l’écran tout entier, appuyez sur la touche 
*C’. Après avoir terminé votre dessin, vous pouvez le sauvegarder 
en appuyant sur la touche ’S’. On vous demande alors le nom du 
dessin et une fois que vous l’avez entré, on vous demande d’appuyer 
sur les touches "REC" et "PLAY". Le dessin est alors sauvegardé 
bloc par bloc. La sauvegarde terminée, on vous demande si vous 
voulez continuer à dessiner ou arréter le programme. Pour charger 
une image en dehors de l’éditeur graphique, entrez les instructions 
suivantes: 


10 WINDOW 1,79,24,25:LOAD 


Lancez ce mini-programme avec RUN et votre image sera chargée. 
Ainsi, le dessin ne sera pas détruit par l'écriture et l'affichage 
des instructions ne se produira que dans les deux dernières lignes 
de l’écran. 


Quand vous aurez fini d’utiliser ce programme, entrez l'instruction 


MODE 2 qui supprimera les fenêtres préalablement définies et 
effacera le dessin. 
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10 MODE 2 

20 CLS 

30 GOSUB 240 

40 x=1:y=1:2= 

50 PLOT x,y,i 

60 jo=J0Y(0):1F jo>0 THEN 80 

70 a$=INKEY$: IF a$=""THEN 70 

80 PLOT x,y,z 

90 y=y+(1 AND jo=1)-(1 AND jo=2) 
100 IF y<O THEN y=0 

110 IF y>367 THEN y=367 

120 x=x+(1 AND jo=8)-(i AND jo=4) 
130 IF jo=9 THEN x=x+isy=yti 

140 IF jo=10 THEN x=x+1:y=y-1 

150 IF jo=6 THEN x=x-1:y=y-1 

160 IF jo=5 THEN x=x-1:y=y#1 

170 IF x<O THEN x=0 

180 IF x>639 THEN x=639 

190 IF 2=0 AND a$=" " THEN z=1:60T0 210 
200 IF 2=1 AND a$=" " THEN z=0 
210 IF a$="s" THEN GOTO 280 

220 IF a$="c" THEN CLG 

230 GOTO 50 

240 REM 

250 ORIGIN 0,33 

260 WINDOW #0,1,79,24,25 

270 RETURN 

280 HINDOH SHAP 0 

290 INPUT'Nom du dessin?" ,a$ 

300 SPEED HRITE i 

310 SAVE a$,b,49152,16385 

320 PRINT'Nouveau ‘Dessin ou ‘F'in" 
330 in$=INKEYS$: IF in$="d" THEN RUN 
340 IF in$<>"f" THEN GOTO 330 
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2.4 PLOTTER DE FONCTIONS 


Le plotter de fonctions est un des auxiliaires les plus précieux 
des mathématiciens mais il peut aider n’importe quel lycéen dans 
ses devoirs de maths. Le programme suivant vous permet d’entrer une 
fonction qui sera plottée dès que vous aurez entré les paramètres 
X. Le programme vous demande en effet le minimum et le maximum X 
ainsi que le pas. A l’aide de ces paramètres, le maximum ou le 
minimum de la fonction est calculé approximativement de façon à 
dessiner l'axe des Y à l’échelle voulue. Ensuite la fonction est 
dessinée, la partie négative d’abord puis la partie positive. Le 
graphique terminé, le programme attend que vous appuyiez sur une 
touche. 


La fonction utilisée crée une parabole dont la partie est disposée 
sur l’axe des X. Essayez les valeurs suivantes: -2 comme minimum, 
+2 comme maximum et 0.1 comme pas. Après un bref temps de calcul 
vous verrez apparaître une courbe intéressante. 


Utilisez toujours la lettre X comme variable. 


10 REM +###44 PLOTTER DE FONCTIONS #####4 
20 MODE 2 

30 CLEAR 

40 DEG 

50 DEF FN f(x) =ABS (x"2-1) 

60 INPUT" minimum (x)";a 

70 INPUT" maximum {x)";b 

80 INPUT'Pas";c 

90 IF ab THEN 20 

100 GOSUB 370 

110 CLE 

120 PLOT 0,200:DRAH 640,200:PLOT 320,0:DRAW 320,400 
130 LOCATE 1,14 

140 mp=320/ABS (a) 

150 mg=320/ABS (b) 

160 IF mp=mq THEN pr=a 

170 IF mp<mq THEN prza 


15 


180 IF aqap THEN pr=-b 

190 PRINT pr 

200 pr$=STR$ (ABS (pr)) 

210 LOCATE (80-LEN (pr$)),14 

220 PRINT pr$ 

230 de$=STR$ (de (1) ) 

240 LOCATE 39-LEN (def) ,1 

250 PRINT def 

260 def=STR$(-de(1)) 

270 LOCATE 39-LEN (def) ,25 

280 PRINT def 

290 æn=200/de (1) 

300 FOR 5=0.1 TD a STEP -c 

310 PLOT 320+s#ap,200+FN f (s)#mn,i 
320 NEXT 

330 FOR n=0.1 TO b STEP c 

340 PLOT 320+n#mq,200+FN + (n)#mn 
350 NEXT 

360 a$=INKEY$:1F a$="" THEN 360 ELSE 20 
370 ml=(ABS (a) +ABS (b)) 

390 det=æ1/20 

390 ml=ml +2 

400 DIM de(22) 

410 FOR i=a TO b STEP det 

420 var=var+i 

430 delvar)=(FN f(i)} 

440 NEXT i 

450 de(21)=(FN f(a)):de(22)=(FN f(b)) 
460 FOR j=21 TO 1 STEP -1 

470 FOR i=i TO j 

480 IF ABS(de(i+1))<ABS(de(i)} THEN 520 
490 de=de(i+i) 

500 de(i+i)=det(i) 

510 deli)=de 

520 NEXT i 

530 NEXT j 

540 PRINT'Maximum ou miniaur probable de la fonction dans cette zone:" 
de(i) 

590 de(1)=ABS(de(1)) 

560 PRINT"Appuyez sur une touche" 
970 a$=INKEY$:IF a$="" THEN 570 
980 RETURN 
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2.5 COULEURS ET CARACTERES 


Les couleurs et la définition des caractères sont un autre point 


fort de votre CPC. 


Toutefois le nombre maximum de couleurs (32) ne peut pas être 
obtenu dans tous les modes. Si vous ne faites pas attention à 
respecter cette limite, vous risquez d’obtenir une erreur IMPROPER 
ARGUMENT. Pour savoir combien de couleurs vous pouvez utiliser dans 
chaque mode, reportez-vous à votre manuel. 


Voici toutefois une table de toutes les instructions pour les modes 
et la fixation des couleurs: 


Mode 0 


Mode 1! 


Mode 2 


Border 


Ink 


Pen 


Papier 


Efface l’écran et entre en mode 20 
caractères 


Efface l’écran et entre en mode 40 
caractères 


Efface l’écran et entre en mode 80 
caractères 


Fixe la couleur du cadre (jusqu’à 26). Si 
deux couleurs sont indiquées, la couleur du 


cadre variera entre ces deux couleurs. 


Affecte une couleur (second paramètre) à un 
canal (premier paramètre). 


Affecte en écriture une couleur (second 
paramètre) à un canal (premier paramètre). 


Affecte pour le fond une couleur (second 
paramètre) à un canal (premier paramètre). 
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2.6 INSTRUCTIONS GRAPHIQUES PUISSANTES 
Nous décrirons dans ce chapitre les instructions suivantes: 


PLOT et PLOTR 
DRAW et DRAWR 
MOVE et MOVER 
ORIGIN 

TEST et TESTR 
XPOS et YPOS 


PLOT X,Y allume le point de coordonnées absolues X,Y. La position 
de ce point est calculée d’après les coordonnées X et Y et 
l'origine actuelle. L’origine est normalement en 0,0, c’est-à-dire 
dans l'angle inférieur gauche de l'écran. PLOTR X,Y allume 
également le point de coordonnées relatives X et Y. Les coordonnées 
de ce point sont donc calculées à l’aide de X et Y additionnées aux 
coordonnées de l'emplacement actuel du curseur graphique. 


DRAW X,Y est une instruction très puissante qui trace une ligne de 
l'emplacement actuel du curseur au point de coordonnées absolues X 
et Y. DRAWR X,Y trace une ligne de l'emplacement actuel du curseur 
au point de coordonnées relatives X et Y. 


MOVE X,Y déplace le curseur, sans allumer de point, vers le point 
de coordonnées absolues X et Y. MOVER vers le point de coordonnées 
relatives X et Y. 


ORIGIN permet de modifier l’origine par rapport à laquelle sont 
calculées les coordonnées absolues. Cette instruction permet 
également de créer une fenêtre. La fenêtre originelle a une largeur 
de 640 points et une hauteur de 200 points. 


L'instruction TEST X,Y vous permet de lire la couleur du point de 
coordonnées absolues X,Y, l'instruction TESTR celle du point de 
coordonnées relatives X,Y. 

Les fonctions XPOS et YPOS vous permettent de lire l'emplacement du 
curseur en entrant: PRINT XPOS, YPOS. 
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2.7 LA TECHNIQUE DES FENETRES 


Les fenêtres sont devenues une caractéristique des microordinateurs 
aussi importante que la résolution dont nous avons parlé au 
Chapitre 2.1. 


Une fenêtre est une zone définie de l’écran de votre ordinateur que 
vous pouvez traiter comme un écran indépendant. L’intéressant dans 
la technique des fenêtres est bien sûr d’avoir la possibilité 
d'utiliser plusieurs fenêtres comme vous le permet votre CPC. 


Une application essentielle de la technique des fenêtres est 
l'ergonomie. Le degré d’ergonomie mesurait à l’origine 
essentiellement l'adaptation matérielle d’un système informatique 
(ordinateur, écran, imprimante, périphériques de stockage) aux 
besoins des hommes qui travaillent sur ce système. Un bon degré 
d’ergonomie signifie qu’un travail prolongé sur un système 
informatique ne provoquera pas une trop grande fatigue corporelle. 


Le concept d’ergonomie a été récemment étendu aux logiciels (les 
programmes). Les scientifiques ont en effet constaté que la 
présentation optique d’un programme, la présentation des données, 
les temps de réponse du système etc. ont une influence décisive 
pour rendre le travail le moins pénible possible. D’autre part on 
peut travailler de façon beaucoup plus efficace sur un programme 
bien adapté. 


Pour un ordinateur tel que le CPC dont le domaine d’application 
privilégié serait plutôt  l’informatique familiale, l’intérét 
essentiel de la technique des fenêtres est la plus grande 
efficacité qu’apporte cette technique, notamment dans deux types 
d’application très importants: les jeux et la gestion. 
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Les fenêtres sont très fréquemment utilisées dans les programmes de 
gestion, comme nous le montrerons avec notre programme de gestion 
de fichier au Chapitre 7.2. Les fenêtres permettent en effet 
d'afficher en permanence des informations dont l’utilisateur a 
constamment besoin (numéro d’enregistrement actuel et numéro de 
champ) dans la zone supérieure de l'écran. Vous pouvez également 
définir une fenêtre graphique avec l'instruction ORIGIN. Dans l’un 
des calculs de tableaux à entrer, les données sont affichées sous 
forme de tableaux puis restituées sous forme de figures camembert 
dans des fenêtres graphiques. 


Les jeux sont également un domaine où la technique des fenêtres 
peut se révéler très utile. Vous pouvez par exemple réserver grâce 
à une instruction de fenêtre la zone inférieure de l’écran pour le 
dessin d’une route que vous n’aurez plus ensuite à modifier. Si 
vous programmez en BASIC, ce peut être le seul moyen d'éviter de 
ralentir votre jeu de façon insupportable. 


Nous vous conseillons de faire plusieurs expériences pour bien 
assimiler la technique des fenêtres. Une première possibilité est 
de modifier le programme de gestion de fichier. Mais vous pouvez 
aussi écrire vous-même de petits programmes: essayez par exemple de 
créer 8 fenêtres avec 8 dessins différents ou essayez de déplacer 
une fenêtre sur l’écran en modifiant les valeurs des angles. Comme 
vous le voyez, le champ d’application des fenêtres est très vaste. 


Pour vous donner quelques idées d’expériences avec les fenêtres, 
nous vous proposons d’essayer les deux programmes suivants. Mais il 
est important que vous créiez également de petits programmes 
utilisant les fenêtres. Même si ces programmes ne présentent en 
eux-mêmes aucun intérét, l'important est que vous appreniez à bien 
maîtriser la technique des fenêtres pour pouvoir facilement 
l'intégrer ensuite à des applications plus sérieuses. 
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1. Le programme suivant crée 8 fenêtres qu’il remplit ensuite de 
caractères que vous ne pouvez pas voir parce que la couleur du fond 
a été modifiée en ligne 80. 

Vous pouvez modifier les valeurs en lignes 500 - 510 qui 
correspondent aux coordonnées des fenêtres. La première ligne est 
la direction X (valeurs entre 1 et 80), la seconde ligne contient 
les valeurs Y (entre 1 et 25). Vous pouvez bien sûr créer encore 
plus de fenêtres en remplaçant dans les boucles la valeur 8 par le 
nombre de fenêtres que vous voulez. 


10 MODE 2 

20 FOR X=1 TO 8 

30 READ COLONNE (X) 

40 NEXT X 

50 FOR Y=1 TO 8 

60 READ LIGNE (Y) 

70 NEXT Y 

80 PAPER 5 

90 FOR X=1 TO 8 

100 FOR Y=1 TO 8 

110 WINDOW COLONNE(X), COLONNE(X)+5,LIGNE(Y),LIGNE(Y)+5 
120 PRINT LELELLELLE 

130 NEXT Y 

140 NEXT X 

500 DATA 1,80,20,60,30,45,27,50 
510 DATA 9,19,12,25,1,3,18,1 


Commentaire du programme : 


10 Mode 80 caractères 

20-40 Boucle de lecture des valeurs direction X 
50-70 Boucle de lecture des valeurs direction Y 
80 Fixation de la couleur du fond 

90-100 Ouverture de la boucle pour X/YŸY 

110 Création d’une fenêtre 

120 Edition d’une chaîne de caractères 


130-140 Fin de la boucle 
500-510 Lignes de DATA 
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2. Le deuxième programme remplit l’écran avec un caractère puis 
efface un tiers de l’écran chaque fois que vous appuyez sur une 
touche. Une telle routine peut être très pratique dans des 
programmes de gestion où l’on a souvent à effacer des parties 
entières de l'écran, ce qui est très facile à réaliser avec des 
fenêtres. 


10 MODE 2 

20 WINDOW 42,1,80,1,8 
30 WINDOW #3,1,80,9,17 

40 WINDOW #4,1,80,17,24 

50 FOR n=2 TO 4 

60 FOR mn=1 TO 639 

70 PRINT "#"s 

80 NEXT:NEXT 

90 FOR x=2 TO 4 

100 MINDOW SMAP x 

110 a$=INKEVS: IF a$="" THEN 110 
120 CLS 

130 NEXT 

140 MODE 2 


Commentaire du programme : 





5 Mode 80 caractères 

10-30 Définition de 3 fenêtres 

35-80 Remplissage de l'écran avec des "*" 

90 Ouverture d’une boucle pour changer les fenêtres 
100 Modification des fenêtres 

110 Attend que vous appuyiez sur une touche 

120 Effacement d’une fenêtre 

130 Fin de la boucle, on passe à la fenêtre suivante 
150 Suppression des 3 fenêtres 
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2.8 CARACTERES DEFINIS PAR L'UTILISATEUR 


Les caractères définissables constituent la dernière possibilité 
remarquable que nous souhaitons évoquer en ce qui concerne le 
graphisme. 


Le manuel explique malheureusement très brièvement ce que sont 
exactement les caractères définissables. 


Un caractère se compose de points allumés ou éteints. La grille 
dans laquelle sont définis les caractères s'appelle une matrice. La 
figure 1 vous montre une matrice. Il s’agit d’une matrice 8*8. On 
trouve en informatique également des matrices 7*8, 7*9 et même 
10*10 ou 12*12 sur les systèmes professionnels. Le CPC se trouve 
donc dans une bonne moyenne. Comme pour la haute résolution que 
nous avons traité au Chapitre 2.1, l’intérét d’une plus grande 
matrice est qu’il permet une plus grande finesse de définition des 
caractères et donc des caractères plus lisibles. 










“ER RE 
RE CT 
CN 
SIRET | CLR 
LR 
[LI DT I [1 





23 


Dans les figures 2 et 3 nous avons allumé des points pour vous 
montrer comment les lettres de l’écran de votre ordinateur sont 
créées. Le CPC dispose de 256 caractères ainsi définis dont 223 
peuvent être redéfinis et donc recevoir une nouvelle forme. 


Pour créer de nouveaux caractères, il faut tout d’abord en définir 
la forme. Le mieux pour celà est que vous dessiniez sur du papier à 
petit carreaux des matrices 8*8. Vous pourrez alors avec un crayon 
remplir des carreaux ou les effacer, jusqu’à ce que vous soyez 
satisfait du résultat. Pour entrer ensuite le caractère ainsi 
dessiné dans votre ordinateur, il faut avoir recours à 
l’arithmétique binaire qui est expliquée dans le Chapitre 4. 


Pour le moment, reportez-vous à la figure 4. Il s’agit à nouveau 
d’une matrice 8*8 mais étendue puisque vous trouvez maintenant au- 
dessus de chaque colonne un nombre de 1 à 128. 

Placez maintenant les points du caractère que vous avez dessiné 
dans cette matrice. Examinez maintenant la première ligne et 
additionnez tous les nombres qui sont placés au-dessus d’un point 
de la première ligne. Placez le résultat de cette addition à la 
droite de la ligne, comme en figure 5. Procédez de même pour les 8 
lignes. Les 8 nombres que vous aurez alors calculés vont maintenant 
vous permettre de définir votre caractère. La figure 5 vous montre 
par exemple les valeurs correspondant à la lettre E. 


CD 


CTTDT IX 
[D 


DDDIXLLS 


«| 


D 





x 
D 


XD 
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Une fois que vous avez dessiné votre caractère dans une matrice et 
calculé les valeurs qui le définissent, le reste est relativement 
simple. Il suffit en effet de réserver de la place en mémoire pour 
votre caractère puis d’affecter celui<i à une touche grâce à une 
instruction. 


Pour réserver de la place en mémoire pour un ou plusieurs 
caractères, utilisez l’instruction SYMBOL AFTER. Cette instruction 
doit être suivie d’un paramètre entre 32 et 255. Si vous choisissez 
par exemple 240, vous pouvez redéfinir tous les caractères dont le 
code CHRS est supérieur à 239 et vous pouvez donc redéfinir 16 
caractères. Les codes CHRS$ sont indiqués dans votre manuel. Plus le 
paramètre de l'instruction SYMBOL AFTER est petit, plus vous 
occuperez de place en mémoire, ce qui ne pose d’ailleurs pas de 
gros problèmes avec la grande capacité mémoire du CPC . Si vous 
utilisez un paramètre plus petit que nécessaire, l’avantage est que 
vous pourrez définir d’autres caractères auxquels vous n’avez pas 
pensé au départ. Faites attention lorsque vous utilisez 
instruction SYMBOL AFTER de ne pas la réutiliser une seconde fois 
car ceci détruirait les caractères que vous avez déjà définis. 


Les caractères redéfinis vous permettent de vous constituer votre 
propre jeu de caractères (futuriste, technique-mathématique, 
chimique, …). Un tel jeu de caractères peut donner des résultats 
très intéressants si vous l’utilisez dans vos programmes de jeux. 
Les bons jeux sont ceux dont les acteurs du jeu ont une belle 
apparence. Un petit "i" bombardant de grands "B"s ne présente pas 
un grand intérét ludique. Vous pouvez donc redéfinir le "i" pour 
lui donner la forme d’un canon et les "B"s pour leur donner la 
forme de dangereux extra-terrestres. Dans ce domaine vous pouvez 
donner libre cours à votre imagination. 


Malheureusement, la méthode consistant à additionner des nombres 
binaires est assez pénible. C’est pourquoi vous aurez certainement 
beaucoup de plaisir à découvrir le programme que nous vous avons 
mitonné dans les pages suivantes. 
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2.8.4 UN GENERATEUR DE CARACTERES PRATIQUE 


Le programme suivant vous permet de définir vos propres caractères 
à l’aide d’un curseur que vous déplacez dans une matrice 8*8. 


Après avoir entré et lancé le programme, vous voyez apparaître un 
carré avec un petit point (le curseur) dans l’angle supérieur 
gauche. Vous pouvez déplacez le curseur avec les touches de 
contrôle du curseur et pour marquer un point, il vous suffit 
d'appuyer sur la touche *COPY”. Le point est alors marqué par une 
étoile. Pour effacer un point, amenez le curseur sur la droite de 
l'étoile à supprimer et appuyez sur la touche espace. Pour entrer 
en mémoire la forme d’un caractère, appuyez sur la touche *E’. Vous 
voyez alors afficher les 8 codes du caractère que vous venez de 
créer et on vous demande quel caractère doit être redéfini. Appuyez 
sur la touche à laquelle vous voulez affecter ce nouveau caractère 
puis appuyez sur ENTER. On vous demande ensuite si vous voulez 
redéfinir d’autres caractères. Tapez *O*’ pour oui, *N° pour non. 


Si, après avoir mis fin au programme vous souhaitez le relancer, 
entrez GOTO 40 car RUN effacerait les caractères que vous avez déjà 
définis. 


10 SYMBOL AFTER 32 

20 IF y=0 THEN y=i 

30 DIM b$(8):DIM c$(8):DIM c(9) 

40 MODE 1:CLEAR 

50 60TO 240 

60 x=1:y=1:2=0 

70 LOCATE x,y 

80 PLOT x#16,(128-y#16)+8,1 

90 a$=INKEY$: IF a$="" THEN 90 

100 PLOT x#16,(128-y#16)+8,0 

110 z=0 

120 y=y+(1 AND a$=CHR$(241))-(1 AND a$=CHR$ (240) ) 
130 IF y>B THEN y=8 

140 IF y=0 THEN y=1 

150 x=x+(1 AND a$=CHR$(243))-(1 AND a$=CHR$ (242) ) 
160 IF x)8 THEN x=8 
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170 IF x=0 THEN x=i 

180 IF a$=" "THEN z=2 

190 IF a$=CHR$(224)THEN z=1 

200 IF 2={ THEN PRINT"#" 

210 IF 2=2 THEN PRINT" " 

220 IF af="e" GOTD 320 

230 GOTO 70 

240 WINDOW#0, 10,17,10,18 

250 ORIGIN 143,127 

260 PLOT 0,0, 

270 DRAW 0,130 

280 DRAW 132,130 

290 DRAM 132,0 

300 DRAW 0,0 

310 GOTO 60 

320 b$="" 

330 PLOT 0,0 

340 MOVER 10,120 

350 FOR a=1 TO 8 

360 FOR n=1 T0 8 

370 IF TESTR(O,0)=1 THEN t$="1"ELSE t$="0" 

380 b$(m)=b$ (m)+t$ 

390 MOVER 16,0 

400 NEXT 

410 MOVE 10,120-(m#16) 

420 NEXT 

430 FOR x=i TO Bsc$(x)="&X"+b$ (x) 

440 c(x)=VAL (c$(x)):NEXT 

450 WINDOW #1,1,39,20,25 

460 WINDOH SHAP 0,i 

470 PRINT c(tsc(2)sc(3)sct4)sct(S)sc(é);c(7);c (8) 
480 INPUT'QUEL CARACTERE DOIT ETRE REDEFINI?",a$ 
490 a=ASC(a$) 

500 SYMBQL a,c (1) ,c (2) ,c (3) ,c (4) ,c (5) ,c(é) ,c (7) ,c (8) 
510 PRINT'VQULEZ-VOUS REDEFINIR D'AUTRES CARACTERES?" 
520 in$=INKEY$: IF in$="" THEN 520 

530 WINDOW SWAP 1,0 

540 1F in$="o"THEN 40 

350 MODE 1 

560 PRINT'FIN DU PROGRAMME" 
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Commentaire du listing: 


Les lignes 10-50 constituent l’initialisation du programme: 
dimensionnement des variables et préparation de la redéfinition des 
caractères. On saute ensuite à la sous-routine qui dessine la 
matrice. La fenêtre est un peu plus grande que la matrice pour 
qu'il n’y ait pas de scrolling vers le haut lorsqu'un point est 
marqué dans l’angle inférieur droit. 


Les curseurs de texte et graphique sont alors positionnés dans 
l'angle supérieur gauche de la fenêtre. La ligne 100 interroge le 
clavier et les lignes 120 - 220 évaluent le résultat. Si vous 
appuyez sur la touche ’E’ (ligne 220) on saute au calcul des 
valeurs composant le caractère: on teste d’abord si au moins un 
point figure dans une ligne (ligne 370). Si un point est mis, on 
ajoute un 1 à la variable B$(M), sinon on ajoute un 0. On constitue 
ainsi pour chaque ligne un nombre binaire de 8 chiffres. Les lignes 
430 et 440 transforment les nombres binaires en nombres décimaux et 
les placent dans la variable C(W). Une fenêtre de texte est alors 
créée dans laquelle les codes sont affichés et les questions vous 
sont posées. La ligne 500 introduit le caractère que vous avez créé 
dans le jeu de caractères. L’instruction MODE 1 supprime alors 
toutes les fenêtres. 


Pour vous montrer ce qu’on peut faire avec un programme générateur 
de caractères, nous avons écrit un petit programme qui vous permet 
de créer les accents français aigu et grave. Voici tout d’abord une 
table des codes de ces accents et des touches auxquelles nous les 
avons affectés: 


Accent Touche Numéro de touche Codes 


à : 58 32,16,120,12,124,204,118,0 
é È 42 8,16,60,102,126,96,60,0 
è : 59 16,8,60,102,126,96,60,0 
ù + 43 32,16,102,102,102,102,62,0 
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Voici maintenant le programme. Après l’avoir lancé, les accents 
sont définis et l'écran est vidé. Une dernière remarque: même 
lorsque la forme d’une touche a été redéfinie, sa fonction reste la 
même. 


10 FOR N=1 TO 4 

20 FOR M=1 TO 9 

30 READ A(M) 

40 NEXT M 

50 SYMBOL A(1),A(2),A(3),A(4),A(5),A(6),A(7),A(8),A(9) 
60 NEXT N 

710 CLS 

80 DATA 58,32,16,120,12,124,204,118,0 
90 DATA 42,8,16,60,102,126,96,60,0 

100 DATA 59,16,8,60,102,126,96,60,0 
110 DATA 43,32,16,102,102,102,102,62,0 


Ces accents vous seront certainement très utiles si vous voulez par 
exemple écrire des lettres avec votre CPC. D'autre part celà 
constituera un excellent exercice pour vous de définir également 
les accents circonflexes et la cédille. 


Voici maintenant encore un programme qui travaille avec des 
caractères redéfinis qui vous montrera bien que cette technique 
permet (presque) d'atteindre la qualité des dessins animés. 


Le programme vous montre une auto fonçant sur un camion à l’arrét. 
Ce mouvement peut être créé simplement avec une boucle et 
l'instruction LOCATE. 


Essayez ensuite de développer ce programme. Vous pouvez par exemple 
modifier la route que suit l’auto ou faire bouger également le 
camion. Vous pouvez également créer des caractères permettant de 
suivre la déformation de la voiture. Et laissez le champ libre à 
votre imagination! 
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10 MODE 1 

{1 SYMBOL AFTER 32 

20 SYMBOL 91,1,2,4,8,255,255,255,63 

30 SYMBOL 93,252, 36,36, 34, 255,255, 255,24 

40 SYMBOL 33,127,127,127,127,127,79,15,7 

50 SYMBOL 35,255, 255,255, 255,255, 190, 190,28 
60 SYMBOL 36,255,255,255, 255,295, 124,0,0 

70 SYMBOL 37,255,255, 255, 255,255, 251 , 248, 112 
80 SYMBOL 38,127,127,127,127,127,127,127,127 
90 SYMBOL 39,255,255,255, 255, 255, 255,255, 255 
100 SYMBOL. 40,255, 255,255, 255,255, 255,255, 255 
110 SYMBOL 41,240,240,240, 240,255, 241 ,241 ,241 
120 LOCATE 2,13:PRINT "&'')" 

130 LOCATE 2,14:PRINT"1#$2" 

140 FOR x=39 TO & STEP -1 

190 LOCATE x, 14:PRINT CHR$ (91): CHRS (93) 

160 LOCATE x, 14:PRINT " " 

170 NEXT x 

180 GOTO 180 


Commentaire du programme: 


5 Fixation du mode 

0-110 Définition du caractère 

111 Affichage de la partie supérieure de la voiture 

112 Affichage de la partie inférieure de la voiture 

120 Ouverture d’une boucle pour le déplacement de la 
voiture dans la direction X 

130 Affichage du véhicule 

135 Effaçage de l’ancien véhicule 

140 Fin de la boucle, la voiture est déplacée vers la 
gauche 
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2.9 CARACTERES GRAPHIQUES 


Les caractères graphiques sont une autre possibilité trés 
intéressante de votre CPC. Les caractères graphiques sont des 
caractères que vous ne pouvez obtenir simplement en frappant une 
touche mais uniquement en utilisant la fonction CHRS(code). Les 
codes de tous les caractères graphiques prédéfinis de votre CPC 
ainsi que leur représentation dans une matrice se trouvent à la fin 
de votre manuel. 


Pour faire apparaître par exemple une bombe à l'écran, il faut 
entrer PRINT CHRS$(252). 


Vous pouvez faire éditer de cette façon tous les caractères 
graphiques. Vous pouvez également les déplacer avec LOCATE: 


10 MODE 2 

20 FOR Y=1 TO 25 

30 LOCATE 40,Y:PRINT CHR$(252) 
40 LOCATE 40,Y:PRINT" " 

50 NEXT Y 


Ce petit programme fait tomber la bombe à travers l’écran avec les 
instructions LOCATE et PRINT. 


La même technique peut vous permettre de réaliser des animations, 
notamment pour vos jeux, qui peuvent être très spectaculaires avec 
un peu d’adresse. 


Voici maintenant un autre programme d’exemple qui vous montrera 
avant tout la vitesse de cette méthode. Le programme se termine par 
un message d’erreur mais ceci n’est pas très grave peut-être 
pourriez-vous essayer de trouver pourquoi. Un conseil: faites 
afficher à la fin du programme la valeur de Y; vous devriez alors 
comprendre d’où vient l'erreur. 
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10 MODE 2 

20 FOR x=1i TO 25 

30 t=S6 

40 q=12 

90 LOCATE t,x:PRINT STRINGS$(&8,CHRS$ (249) ) 
60 NEXT x 

70 y=1 

80 FOR x=q TO q+4 

90 LOCATE y,x: PRINT STRINGS(&8,CHRS$ (250) ) 
100 NEXT x 

110 FOR x=q TO q+4 

120 LOCATE y,x: PRINT STRING$(&8B," ") 

130 NEXT x 

140 y=y+8 

150 GOTO 80 


Commentaire du programme: 


10 Passage en mode 80 caractères 

20 Ouverture de la boucle du mouvement descendant 

30 Valeur initiale pour le mouvement descendant des 
petits hommes 

40 Valeur Y pour les petits hommes fixes 


50-60 Boucle d'édition des petits hommes verticaux 

70 Test si Y égale 1 

80-100 Boucle pour le mouvement horizontal avec des pas de 4 

110-130 Boucle pour supprimer le dernier bloc de petits hommes 

140 Incrémentation de la valeur pour que les petits hommes se 
déplacent vers l’avant par blocs 
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2.10 LA MEMOIRE ECRAN 


La mémoire principale de votre CPC a une taille de 64K, soit 65536 
octets. Vous pouvez utiliser pour vos programmes BASIC environ 42. 
La mémoire est organisée en 4 blocs de 16K. Ces blocs sont appelés 
banques et sont numérotés de 0 à 3. La banque 0 est donc le bloc 
allant de l’adresse O0 à l'adresse 16383, la banque 3 le bloc de 
49152 à 65535. Lorsque vous allumez votre ordinateur, la mémoire- 
écran occupe la banque 3. Quel que soit donc le mode de gestion de 
l'écran que vous utilisez, il y a toujours 16K qui sont réservés 
pour la mémoire-écran. Entrez maintenant les lignes suivantes et 
lancez le programme avec RUN : 


10 REM Ecran 1 

20 MODE 2:PRINT"a" 

30 FOR t=&CO000 to &FFFF STEP &800 
40 PRINT BIN$(PEEK(t),8):NEXT t 


Si vous ne vous êtes pas trompé, vous voyez apparaître les 
informations suivantes : 


Om OCOoOOCOCoORm 
Orrée Or O©O© 
OrOrOo-O©o 
Om Or Oo © © 
Ormes © © 
Oremm me © © © 
Om OOo OC 
OO OCOC 
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Vous reconnaissez la carte matricielle du a minuscule que la ligne 
10 a fait afficher dans l'angle supérieur gauche de l'écran. 
Modifiez quelque peu votre programme: 


10 REM Ecran 2 

20 FOR t=&C000 to &FFFF STEP &800 
30 FOR a=0 TO 3 

40 PRINT BINS(PEEK(t+a),8);" ": 

50 NEXT a:PRINT 

60 NEXT t 


Entrez maintenant MODE 2 en mode direct puis RUN. Vous obtenez les 
cartes matricielles des lettres KR e a d. En effet après avoir 
exécuté l'instruction MODE 2, votre ordinateur a écrit Ready en 
haut de l’écran. 


Vous pouvez maintenant essayer de voir ce qui se produira si vous 
choisissez un autre mode avant de lancer le programme. Entrez MODE 
1 puis RUN. Le résultat est inattendu. Vous pouvez encore 
distinguer un R et un e mais vous voyez que la carte de chaque 
lettre est répartie sur deux matrices et la moitié droite de chaque 
matrice est pleine de 0. Essayons de savoir pourquoi les lettres 
apparaissent deux fois plus grosses en mode 1 bien qu’en fait il 
n’y ait pas plus de 1 qu’en mode 80 caractères. 


Entrez: PEN 2 
MODE I 
RUN 


Vous pouvez à nouveau reconnaître les deux lettres R et e, toujours 
réparties chacune sur deux matrices. Mais la différence est que 
c’est maintenant la partie gauche de chaque matrice qui est 
constituée de O alors que les bits allumés se trouvent dans la 
partie droite. 
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La raison de cette différence tient à l’organisation de la mémoire- 
écran de 16K. En effet les mêmes bits sont utilisés à la fois pour 
définir la forme mais aussi les couleurs des caractères. Il faut 
maintenant examiner comment ceci se passe exactement suivant le 
mode de l'écran qui a été choisi. 
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2.10.1 MODE 2 


En mode 2, les choses restent relativement simples. Chaque bit mis 
(=1) correspond à un pixel (mini-point de l'écran) allumé avec la 
couleur des caractères. Un 1 signifie donc qu’un pixel reçoit la 
couleur bleue des caractères (définie par le stylo: PEN) et un 0 
qu’il reçoit la couleur jaune du fond de l'écran (définie par le 
papier: PAPER). Par exemple, si vous entrez: 


MODE 2:PAPER I:PEN 0 
CLS 


et que vous lancez Ecran 2 avec RUN, vous voyez que chaque 1! 
correspond toujours à un point jaune qui est maintenant la couleur 
du fond de l’écran et chaque 0 toujours à un point bleu, nouvelle 
couleur des caractères. 

En résumé: en MODE 2, chaque bit de la mémoire-écran indique la 
couleur du point correspondant de l’image de l'écran: 


0 
1 


bleu 
jaune 
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2.10.2 MODE 1 


Passez maintenant en MODE 1. Ce mode vous permet d’avoir 40 
caractères par ligne et de définir 4 couleurs différentes pour les 
caractères. Chaque octet de la mémoire-écran indique quelle couleur 
doit avoir un point de l’écran. 

Examinons un de ces octets: 


Bit No I1716I1514H31I12111I0I 


En MODE I, chaque octet est divisé en deux quartets, comprenant 
donc 4 bits chacun, que nous avons délimités par un II. Les bits 
occupant La même position dans leurs quartets respectifs 
constituent une paire: bits 3 et 7, 2 et 6, 1 et 5, et 4 et O. 
Chacun de ces couples de bits représente donc une des quatre 
couleurs disponibles pour les caractères. On ne pourrait donc en 
principe fixer de cette façon les couleurs que de 4 pixels de 
l'écran seulement. Comme chaque octet doit correspondre à 8 pixels, 
chaque couple de bits correspond en fait également à deux pixels 
contigus. Les bits 3 et 7 correspondent à la paire de pixels située 
à l’extrème gauche. 

Voici une table des couleurs ainsi représentées par chaque couple 
de bits: 


Valeur des bits Couleur 


Bleu 

Jaune clair 
Bleu-vert clair 
Rouge clair 


= == © © 
On © 


Il est maintenant temps de se reporter au programme "Ecran 2" et 
aux deux exemples que nous vous demandions d’essayer: la première 
ligne de la première carte matricielle se présentait ainsi: 


11110000 
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Reconstituez maintenant les couples de bits solidaires et regardez 
dans la table à quelle couleur ils correspondent: 


Couple de bits: 3,7 2,6 1,5 0,4 
Valeur: 01 01 01 O1 
Couleur: jaune jaune jaune jaune 


Pour bien comprendre le système de mise en mémoire des couleurs en 
MODE ll, prenez une feuille de papier et tracez-y 4 carrés de 8 
carreaux sur 8. Divisez chaque carré en 4 colonnes de deux carreaux 
de large et en 8 lignes. Chaque paire de carreaux sur votre papier 
correspond à une paire de pixels à l’écran. Remplissez chaque paire 
de carreaux si le couple de bits correspondant indique la couleur 
jaune. Laissezla vide si les bits indiquent bleu. Dans notre 
exemple vous ne devez pas obtenir de couleur autre que jaune ou 
bleu. Quand vous aurez terminé, vous obtiendrez un R et un e très 
larges. 


Changez maintenant la couleur des caractères avec l’instruction PEN 
2. Entrez CLS et RUN. Vous constatez maintenant que tous les 
couples de bits contiennent soit 10 soit 00. En consultant la 
table, vous voyez que 10 produit la couleur bleu-vert clair: 

Après toutes ces petites expériences, il ne devrait plus vous être 
très difficile de réaliser maintenant des caractères de quatre 
couleurs différentes. Notez cependant que de tels caractères ne 
peuvent pas être entrés en mémoire dans la table des caractères 
avec les instructions SYMBOLou SYMBOL AFTER. Leseul moyen deles 
réaliser est d’en POKEr les valeurs dans la mémoire-écran. Le mieux 
est donc de placer ces valeurs dans des lignes de DATA qui seront 
placées par le programme dans la mémoire-écran. 

Vous trouverez à la fin de cette section la formule vous permettant 
de calculer dans quel emplacement de la mémoire-écran vous devez 
POKEr un caractère de quatre couleurs. 
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2.10.3 MODE 0 


Ce mode de fonctionnement de votre CPC permet à votre ordinateur 
d'atteindre sa puissance maximum dans le domaine des couleurs, au 
détriment toutefois de la résolution. En effet, pour pouvoir 
sélectionner pour chaque pixel 16 couleurs différentes, il faudrait 
une mémoire de 64K. Comme c’est déjà le cas en mode 1, le mode 0 a 
recours au petit truc qui consiste à affecter à un groupe de pixels 
contigus la même couleur. En mode multicolore, chaque couleur est 
fixée pour un groupe de 4 points contigus. Voici la table des 
couleurs disponibles: 


Bin Hex Déc Couleur 


0000 O0 O Bleu 

0001 1 1 Jaune clair 
0010 2 2 Bleu-vert clair 
0011 3 3 Rouge clair 
0100 4 4 Blanc brillant 
0101 5 5 Noir 

0110 6 6 Bleu clair 
0111 7 7 Magenta clair 
1000 8 8  Bleu-vert 
1001 9 9 Jaune 

1010 A 10 Bleu pastel 
1011 B 11 Rose 

1100 C 12 Vert clair 
1101 D 13 Vert pastel 
1110 E 14 Jaune vif 
1111 F 15 Bleu ciel 
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Essayons de placer ces 16 couleurs à l’écran: 


10 REM Exemple de couleurs 

20 DATA &00,&11,&22,&33,&44,&55,&66,&77,&88, 
&99,&AA,&BB,&CC,&DD,&EE,&FF 

30 MODE 0 

40 FOR d=0 TO 31 STEP 2 

50 READ x 

60 FOR t=&C000 TO &FFFF STEP &800 

70 POKE t+d,x 

80 NEXT t:INEXT d 

90 GOTO 90 


Si vous lancez ce programme avec RUN vous n’obtiendrez pas le 
résultat voulu. Comme en mode 1, les bits qui servent à indiquer 
une couleur ne sont pas des bits contigus: la couleur des 4 pixels 
les plus à gauche est indiquée par les bits 1,3,5 et 7 d’un octet, 
celle des 4 pixels les plus à droite par les bits 0,24 et 6. 
D'autre part l’ordre dans lequel chaque groupe de 4 bits doit être 
considéré est le suivant: 


4 pixels de gauche: bits 1,5,3,7 
4 pixels de droite: bits 0,4,2,6 


Nous pouvons maintenant appeler toutes les couleurs disponibles: 
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Bit No 76543210 gauche droite octet 


00000000= 0 0 0 
11000000= 1 1 192 
00001100= 2 2 12 
11001100= 3 3 204 
00110000= 4 4 48 
11110000= 5 5 240 
00111100= 6 6 60 
11111100= 7 7 252 
00000011= 8 8 3 
11000011= 9 9 195 
00001111= 10 10 15 
11001111= 11 11 207 
00110011= 12 12 51 
11110011= 13 13 243 
0O0111111= 14 14 63 
11111111- 15 15 255 


Il faut donc modifier le programme Exemple de couleurs en tenant 
compte des valeurs indiquées dans la colonne octet: 


20 DATA 0,192,12,204,48,240,60,252,3,195,15,207,51, 243,63,255 
Si vous lancez maintenant le programme ainsi modifié, vous obtenez 
bien les 16 couleurs possibles, dans le bon ordre. Vous ne 


distinguez bien sûr que 15 couleurs puisque la couleur O0 est 
identique à la couleur du fond de l’écran. 
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2.10.4 POSITIONNEMENT D'UN CARACTERE 


Dans les derniers chapitres, nous avons souvent parlé des 
caractères multicolores ainsi que de la façon de les réaliser. 
Voici maintenant un petit programme utilitaire qui vous permettra 
de positionner une carte mémoire de couleurs sur l’écran : 


10 REM Positionnement d’un caractère 

20 MODE 0 

30 INPUT"Quelle colonne";c 

40 LOCATE 1,1 

50 INPUT"Quelle ligne":;l 

60 LOCATE 1,1 

70 INPUT"Code couleur ";couleur 

80 LOCATE 1,1 

90 base=&C000 

100 FOR adresse=base TO base + &3FFF STEP &800 
110 POKE adresse + (c-1) + ((1-1)*80),couleur 
120 NEXT adresse 

130 GOTO 30 


Ce programme POKE des petits carrés de la taille du curseur en mode 
2 dans l'emplacement que vous définissez par ses numéros de colonne 
et de ligne. Le code couleur qui vous est demandé n’est pas 
identique à celui que vous trouvez dans votre manuel. Il faut que 
vous calculiez ce code vous-même, ce qui ne devrait pas être trop 
difficile si vous avez lu attentivement le chapitre 2.10.3. La 
ligne 90 affecte à la variable base la valeur standard pour le 
début de la mémoire écran. Vous trouverez cependant au Chapitre 6 
une routine en langage-machine pour déplacer le début de la 
mémoire-écran. Si vous utilisez cette routine, il faudra ensuite 
modifier la ligne 90 en fonction de la nouvelle adresse de début de 
la mémoire-écran. 


La ligne 110 est la ligne la plus importante du programme 
puisqu'elle place le carré de couleur dans l’emplacement voulu. 
Notez que l'angle supérieur gauche de l'écran (position HOME) a 
pour coordonnées 1,1 et qu’il n’y a pas dans la forme actuelle du 
programme de routine contrôlant la validité des valeurs entrées. 
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STEP &800 


Il ne vous a certainement pas échappé que dans toutes les boucles 
de lecture ou d’écriture d’un caractère dans la mémoire-écran 
apparaît le pas "STEP &800". C’est qu’en effet, contrairement à la 
plupart des autres ordinateurs où les 8 octets correspondant aux 
lignes composant un caractère sont généralement disposés à la suite 
les uns des autres, dans votre CPC sont tout d’abord placées à la 
suite les unes des autres les premières lignes des 2000 
emplacements possibles de l’écran (25 lignes de 80 caractères), 
puis les secondes lignes de ces 2000 emplacements, etc. L'adresse 
de la première ligne du premier emplacement est aussi l’adresse du 
début de la mémoire-écran: &C000 = 49152. La seconde ligne du 
premier emplacement de l’écran se trouve en &C800 = 51200, etc... 
C’est pourquoi, une fois calculée l’adresse en mémoire de la ligne 
d’un caractère, il faut toujours ajouter &800 à cette position pour 
obtenir l’adresse de la ligne suivante du même caractère: 


Hex Décimal 
Ligne 1 CO000 49152 
Ligne 2 C800 51200 
Ligne 3 DO000 53248 
Ligne 4 D800 55296 
Ligne 5 E000 57344 
Ligne 6 E800 59392 
Ligne 7 F000 61440 
Ligne 8 F800 63488 


Chaque ligne utilise donc un bloc de &800 = 2048 octets. Or il n°y 
a que 2000 emplacements différents sur l’écran. Celà signifie que 
dans chacun de ces blocs, 48 octets sont inutilisés, dans lesquels 
vous pouvez placer des données ou des routines en langage-machine, 
sauf toutefois si vous utilisez la possibilité de scrolling 
horizontal que nous aborderons au Chapitre 6. Dans ce cas en effet 
ces octets sont utilisés pour la gestion de l’écran. 
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2.11 LES CARACTERES ALTERNATIFS VUS SOUS UN 
AUTRE ANGLE 


Nous vous avons déjà indiqué au chapitre 2.8 une manière de 
modifier le jeu de caractères. Il peut cependant arriver que la 
technique fondée sur les instructions SYMBROL et SYMBOL AFTER ne 
soit plus satisfaisante, soit que vous ne souhaitiez créer qu’un 
nouveau caractère, soit que vous travailliez entièrement en 
langage-machine, ou bien enfin que vous ne vouliez modifier que 4 
ou 5 points d’un caractère existant. Dans ce cas nous vous 
conseillons d’utiliser la méthode à laquelle fait appel le 
programme suivant: 


10 REM Lire le jeu de caractères 
20 MODE l! 

30 FOR t-HIMEM TO HIMEM+7 
40 PRINT BINS(PEEK(t),8) 

50 NEXT t 


Vous obtenez à l'écran la carte bits de la flèche pointée vers le 
haut. Le code de ce caractère est 240. Vous pouvez lire de la même 
façon tous les caractères dont le code est supérieur à 239. Les 
choses sont plus compliquées pour les autres caractères. C’est 
pourquoi nous nous en tiendrons là pour le moment. Il est de même 
très facile de modifier ces 16 caractères. Essayez la ligne BASIC 
suivante: 


POKE HIMEM#+7,255 
Lancez à nouveau le programme ci-dessus qui doit toujours se 
trouver en mémoire et vous verrez que notre flèche a maintenant un 


"pied". Pour éditer la flèche à l’écran, entrez: 


PRINT CHR$(240): PRINT 
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La seconde instruction PRINT vous permet de bien voir le nouveau 
caractère sans être géné par le mot Ready. 

Voici la liste des caractères auxquels vous pouvez accéder 
librement pour les lire ou les modifier, en suivant la même 
méthode: 


CHE NO Her [Ce Passe, der 


£4n 





REA 
HE 
RE L 





AGE d à 
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CHAPITRE 3 LE SON 


3.1 INTRODUCTION 


Le chapitre suivant explique quelques principes fondamentaux de la 
production de bruits et de sons: 


- connexion du CPC sur une chaîne stéréo 

- principes de la musique et du son 

- explication des instructions de production de sons 
- env (enveloppe du volume) 

- ent (enveloppe du ton) 

- éditeur de sons 

- démonstration d’applications dans des jeux 


Nous avons illustré autant que possible par des exemples concrets 
les notions un peu théoriques qui vont suivre. Lisez donc le 
chapitre suivant avec votre ordinateur et n’hésitez pas à taper les 
programmes les plus importants. 


Si vous ne comprenez pas très bien une notion quelconque relisez 
attentivement le passage de votre manuel qui s’y rapporte. 


Si vous avez l'esprit plus mathématique que musical, vous vous 
apercevrez bien vite que la musique, notamment la musique sur 
ordinateur est très liée aux mathématiques et à la physique. Si 
tout celà vous semble trop compliqué, vous pourrez au moins prendre 
plaisir à écouter les jolies mélodies dont vous trouverez les 
listings à la fin de ce chapitre. 


3.2 CONNEXION DU CPC SUR UNE CHAINE STEREO 


Vous avez certainement déjà remarqué que le haut-parleur intégré ne 
rend pas justice aux possibilités étendues de votre CPC dans le 
domaine musical. C’est pourquoi nous vous expliquons en détail 
comment brancher votre ordinateur sur une chaîne stéréo. 
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Si vous essayez de brancher directement un casque sur la connexion 
se trouvant à l’arriére de votre CPC, vous constaterez que celui<i 
ne produit aucun son par lui-même car le signal qu’il sort n'est 
pas amplifié et n’est donc pas audible avec votre casque. 


Il faut donc utiliser un amplificateur tel qu’en possède toute 
chaîne stéréo ou bien sûr également tout appareil de radio ou 
lecteur de cassette. 


Comment allez-vous envoyer le signal à votre amplificateur? 
Réalisez pour celà un câble de branchement en dérivé avec du côté 
relié à votre CPC une fiche mâle de 3.5 mm de diamétre. Notez bien 
qu’il s’agit d’une transmission tripolaire comme pour un casque de 
walkman par exemple. Du côté de votre amplificateur, il vous faut 
une autre fiche mâle pouvant s’enficher dans l’entrée microphone. 
C'est en effet l’entrée micro qui réagit le mieux à des sons qui 
n’ont pas été amplifiés préalablement. Si vous ne disposez pas 
d’une telle entrée sur votre amplificateur, utilisez l'entrée pour 
la platine disque ou pour le magnétophone. 


Reliez maintenant les deux appareils ensemble, non sans les avoir 
éteints tous deux au préalable pour éviter des complications très 
désagréables. 


Après avoir ‘relié les deux appareils puis après les avoir à nouveau 
allumés, baissez complètement le volume pour éviter une surprise 


désagréable. 


Vous pouvez maintenant tester le volume le plus adapté en entrant 
l'instruction suivante: 


SOUND 7,284,32767,1 
Cette instruction produit le LA 440 qui est utilisé maintenant par 


les musiciens du monde entier pour accorder leurs instruments. 
Toutes les autres notes sont calculées à partir de celle-ci. 
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3.3 PRINCIPES DE BASE DU SON 


La production de bruits ou de sons est un aspect très important des 
possibilités d’un microordinateur familial. Dans ce domaine, le CPC 
peut par ses Caractéristiques remarquables supporter la comparaison 
avec les meilleurs ordinateurs de sa catégorie. 


Le CPC peut par exemple produire des ultra-sons, c’est-à-dire des 
sons que vous n’entendrez pas parce qu’ils dépassent le spectre 
sonore audible par une oreille humaine, mais que votre chien par 
contre pourra entendre. En effet, un homme peut entendre des sons 
compris entre 16 Hz et 16 Khz alors que le CPC peut produire des 
sons entre 30 Hz et 125 Khz. Si par exemple vous entrez SOUND 
1,1,100 vous n’entendrez rien alors que votre chien réagira 
certainement. 


Vous savez qu’un morceau de musique n’est qu’une suite de tons de 
différentes fréquences. Si la succession des tons choisis est 
heureuse, vous aurez de la belle musique, dans le cas contraire de 
la mauvaise ou, du moins, ce que vous considérez comme telle. 


La belle musique ne sonne cependant bien que si vous disposez 
également d’un bel instrument, comme c’est le cas avec le CPC. 


Voyons maintenant comment se produit un son pour mieux comprendre 
le principe de la musique sur ordinateur: 


Un son se compose d’ondes ou vibrations. Un ton est plus haut qu’un 
autre si sa fréquence est supérieure, donc s’il se compose de plus 
de vibrations dans un même intervalle de durée. L'unité de mesure 
des fréquences est le Hertz (Hz). 


Voici un exemple: 
Le do du milieu (do de la clé sur un piano) a une fréquence de 
261,626 Hz. 


Le la de référence international a une fréquence de 440 Hz et est 
donc plus haut que le do du milieu. 
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La figure suivante représente une vibration avec tous les termes 
importants que nous allons maintenant expliquer. 


Amplitude 


Temps 


Elongation 


Durée de vibration 
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1. Elongation (écart momentané par rapport à la situation de pause 


Ce concept n’est pas très important pour la production de sons car 
il ne peut pas être employé d’une manière pratique. Il s’agit 
simplement du nom de l’axe des Y. 


2. Amplitude (écart maximum ou amplitude de vibration) 


Cette valeur correspond au volume d’un son: plus l’amplitude est 
grande, plus le son est fort. 


3. Durée 


Ce facteur jouera un grand rôle pour la constitution des courbes 
d’enveloppe. Il correspond à l’axe des X de notre graphique. 


4. Durée de vibration 


Il s’agit de la durée d’une vibration complète. Ce facteur est 
inversement proportionnel à la fréquence. 


Pour ceux qui ne connaissent pas déjà tous les secrets de la 
physique des vibrations voici le principe qui permet à votre CPC de 
produire des sons: 


Un haut-parleur, qui est indispensable pour que votre ordinateur 
puisse produire des sons, se compose d’un aimant, d’une bobine et 
d’une paroi sonore. Suivant le rythme de l'envoi du courant 
électrique dans la bobine, celle<i attire ou repousse l’aimant. Si 
elle le repousse, celui-ci met en mouvement la paroi sonore, créant 
ainsi une vibration qui se transmet et s’ammplifie dans l'air, 
jusqu’à parvenir à votre oreille. 


Le rythme de l'envoi du courant électrique permet également de 
déterminer la fréquence et donc la hauteur du son. 
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3.4 INSTRUCTIONS SONORES 


Les principales instructions sonores du CPC sont: 


SOUND 
ENV 

ENT 
RELEASE 


L'instruction SOUND est l'instruction de base pour produire des 
sons sur votre CPC. Elle a les paramètres suivants: 


1. Etat canaux: cette valeur indique à l’ordinateur quel canal 
sonore doit être employé et quelles autres activités doivent être 
activées telles qu’un rendez-vous ou un arrêt par exemple. 


Les valeurs de ce paramètre sont calculées d’après la signification 
suivante des différents bits: 


Bit Valeur Commande 

0 | son envoyé au canal A 

| 2 son envoyé au canal B 

2 4 son envoyé au canal C 

3 8 rendez-vous avec canal A 
4 16 rendez-vous avec canal B 
5 32 rendez-vous avec canal C 
6 64 arrêt 

7 128 flush 


Si vous souhaitez par exemple envoyer un son sur tous les canaux, 
le paramètre état canaux doit donc recevoir la valeur 7. 


Le rendez-vous vous permet de synchroniser les trois canaux sonores 


et donc de faire exécuter une mélodie avec des pauses, sans que 
celà occasionne un craquement désagréable du haut-parleur. 


Si 


Voici comment se présente un rendez-vous: 


1 2 3 4 5 
Canal A: NO NO NO RB RB 
Canal B: NO RC NO NO RA 
Canal C: NO RB RA NO NO 


NO signifie qu’une note est jouée, RB correspond à un rendez-vous 
avec le canal B. 


Voici maintenant un schéma représentant le déroulement dans le 
temps de la structure de rendez-vous ci-dessus. Les actions 
synchronisées figurent dans la même colonne. NO correspond à une 
note, PA à une pause: 


Canal A: NO NO NO PA NO NO PA PA 
Canal B: NO NO NO NO NO NO PA PA 
Canal C: NO NO PA PA PA NO NO NO 


Lorsqu'un rendez-vous est arrangé, une pause se produit dans le 
canal appelé. Le canal appelé est celui qui continue à jouer. 


Une autre possibilité de synchroniser les canaux consiste à mettre 
un arrêt. Un arrêt vous permet d’arrêter l'émission de son d’un 
canal déjà plein puis de la relancer avec l'instruction RELEASE. 
L'avantage par rapport au rendez-vous est que le canal sonore peut 
être rempli pendant un arrêt alors qu’un rendez-vous n’admet aucun 
son avant que le rendez-vous ne soit exécuté. 


2. Valeur de la note: le second paramètre après l’instruction SOUND 
est la valeur de la note. Vous pouvez trouver les valeurs des 
différentes notes dans une annexe de votre manuel. Vous n’avez 
normalement besoin que des valeurs de l’octave O0 et vous pouvez 
ainsi calculer les autres valeurs: 

Valeur = Valeur de la note de l’octave 0 / 2”octave 


Exemple: La valeur du DO de l’octave -2 sera: 478/27-2 ou 478/0.25 
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3. Durée du son: cette valeur doit être donnée en centièmes de 
seconde. 


Si la valeur de ce paramètre est négative, celui-ci indique combien 
de fois la durée de ENV doit être répétée. Si cette valeur est 
nulle, le son sera joué conformément à la durée de ENV. 


4. Volume: paramètre compris entre 0 et 7 lorsqu’il n’y a pas d'ENV 
et entre O et 15 s’il y a une ENV. 


Les deux paramètres suivants seront expliqués plus tard, en liaison 
avec ENV et ENT. 


Le dernier paramètre sert à la production de bruits. Si celle-ci 
est utilisée sur les trois canaux, les trois canaux reçoivent le 
même bruit. 


L'instruction suivante la plus étroitement liée à l'instruction 
SOUND est l'instruction RELEASE qui permet de supprimer un arrêt 
préalablement posé. Il suffit d'indiquer comme paramètre le numéro 
du canal (A=1, B=2, C=4). 


Avant de passer maintenant à la partie la plus importante, 
l'explication des courbes d’enveloppe, nous vous proposons de 
mettre un peu d'ambiance en tapant le programme suivant qui joue 
"Oh when the saints go marching in". N'oubliez pas de le 
sauvegarder sur cassette car nous en aurons besoin plus tard. 


10 READ a 

20 1F pci THEN RESTORE:GOTO 10 

30 SOUND 1,a,b 

40 SOUND 2,0. 5#a,b 

50 SOUND 4,0.25#a,b 

60 GOTO 10 

70.DATA 478,50,379,50,358,50,319,200,0,5,319,50,478,50,379,5 
0,358,50,319,200,0,5,319,100 

80 DATA 478,50,379,50,358,50,319,100,379,100,478,100,379, 100 
,426,200 

90 DATA 0,5,426,50,379,50,0,5,379,50,426,50,478,150,0,5,478, 
50 

100 DATA 379,100,319,100,0,%,319,50,358,150,0,5,358,100,379, 
50,358,50,319,100,379,100 

110 DATA 478,100,426,100,478,200,0,5,478,50,-1,1 
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3.5 L’INSTRUCTION ENV ET LES COURBES D’ENVELOPPE 
DU VOLUME 


L’instruction ENV modifie le volume d'un son de façon à imiter le 
jeu des "vrais" instruments de musique. 


En augmentant ou en diminuant le volume d’un son pendant le jeu, on 
peut donc obtenir une meilleure sonorité. 


En utilisant l'instruction ENV il faut en principe que le volume 
ait été mis à O avec l'instruction SOUND (sauf si vous voulez 
délibérément une valeur différente) pour que l’enveloppe fonctionne 
pleinement. 


Les courbes d’enveloppe sont affectées à des symboles ou numéros 
d’enveloppe qui peuvent ensuite être employés dans l'instruction 
SOUND pour appeler une courbe d’enveloppe. 


Ce symbole est le premier paramètre de l'instruction ENV. 
Les trois paramètres suivants: nombre de pas, pas et temps de pause 
peuvent être employés 5 fois les uns à la suite des autres. 


Le nombre de pas indique en combien de pas le volume doit augmenter 
ou diminuer. Le pas, multiplié par le temps de pause donne la durée 
du son. Si cette valeur est négative, le volume diminue. Le temps 
de pause est la durée en centièmes de seconde pendant laquelle doit 
être maintenu le volume actuel. Ce temps de pause peut être 
également appelé durée du pas. 
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Essayez maintenant avec notre petite chanson l’ENV suivante: 
ENV 1,5,2,1,1,0,16,5,-3,2 


Le résultat vous étonnera certainement mais nous allons maintenant 
vous expliquer comment nous avons calculé ces valeurs: 


Votre manuel comprend une page sur laquelle vous pouvez dessiner 
les courbes de vos enveloppes. Pensez bien à noter les trois 
paramètres pour chaque partie de la courbe. Voici un dessin qui 
vous montre comment calculer les paramètres d’une ENV. 
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3.6 ENT ET LA COURBE DE L'ENVELOPPE DU SON 


L’enveloppe du son est dans son principe analogue à l’enveloppe du 
volume mais les possibilités ne sont pas aussi grandes que pour 
l'enveloppe du volume. Les modifications de l'enveloppe du son 
permettent notamment de réaliser un vibrato c’est-à-dire une 
modification minime de la hauteur du son qui donne une impression 
de tremblement. 


La structure de cette instruction et de ses paramètres de nombre de 
pas, de pas et de temps de pause est identique à celle d'ENV mais 
alors qu'ENV ne nécessite en principe que trois parties, attaque, 
soutien et relâche, ENT en nécessite le plus souvent 5. 


L'instruction suivante produit une sorte de vibrato: 

ENT 1,5,1,1,10,-1,1,10,1,1,5,-1,1 

N'oubliez pas dans le programme "Oh when the saints" d’appeler 
maintenant également ENT avec la valeur ] qui correspond au numéro 
de notre ENT. Si vous employez une valeur négative, l'enveloppe est 
répétée. 


Voici la courbe qui représente notre enveloppe. Nous avons choisi 
les mêmes unités que pour la courbe ENV. 


Suivez le même schéma pour calculer les valeurs de vos enveloppes. 


ENT 
+5 
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Il faut enfin remarquer que nos enveloppes ne sont pas de 
véritables courbes puisqu'il ne nous est pas possible d’indiquer 
les valeurs de tous les points d’une courbe mais seulement celles 
des angles de nos courbes. Il s’agit donc plutôt de vibrations 
carrées, se composant de segments de droites. 


Ces deux instructions vous permettent cependant théoriquement de 
modifier chaque son jusqu’à le rendre méconnaissable, ce qui peut 
être très intéressant pour un synthétiseur. L’éditeur de son que 
nous vous fournissons plus loin sera à cet égard un excellent point 
de départ. 


La méthode la plus simple pour bien comprendre le principe des 
enveloppes consiste à se livrer au plus grand nombre possible 
d'expériences car une sonorité voulue ne peut être obtenue 
uniquement par des calculs abstraits. 


Pour simuler un instrument, vous devez savoir comment il sonne 
exactement: un instrument à corde émet le plus souvent un petit 
écho dù à la vibration des cordes. Pour imiter ce phénomène, il 
faut donc que la troisième phase d’'ENV, la tombée du volume soit 
plus longue que la première phase d’attaque du son. 

Pour les instruments à percussion tels que batterie ou timbale, cet 
écho ne se produit pas et le son doit donc retomber plus vite qu’il 
n’est monté. 


Mais il est nettement plus compliqué d’imiter un instrument à vent. 
Il y a en effet différentes façon de jouer de la trompette ou du 
trombone. Le plus important est de faire monter le volume de 
manière brutale (plus ou moins suivant la taille du corps de 
résonance) et de faire dépendre la retombée du volume du type de 
jeu qu’on veut imiter. 
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3.7 L'EDITEUR MUSICAL 


Comme vous l’avez certainement constaté, l'emploi des instructions 
musicales est tout de même relativement compliqué puisque vous êtes 
obligé en permanence de faire des calculs de paramètres. C'est 
pourquoi nous vous proposons un éditeur musical qui vous permettra 
de produire des sons simplement en appuyant sur une touche du 
clavier. L’affectation des touches correspond à la gamme et va donc 
de do à si et les demi-tons (les dièzes) peuvent être obtenus avec 
la touche SHIFT., 


Le programme vous permet de: 


1. programmer des mélodies 
2. sauvegarder des mélodies 
3. faire jouer des mélodies 
4, charger des mélodies 


1. Ce premier point du programme vous permet de produire des sons 
en appuyant sur différentes touches du clavier. Ces sons sont mis 
en mémoire par votre CPC qui pourra les rejouer lorsque vous le 
souhaiterez. Vous disposez de 9 octaves que vous pouvez 
sélectionner en appuyant sur une touche entre 1 et 9. L’affectation 
des touches sera récapitulée plus loin dans un tableau. En appuyant 
sur la touche *P’ vous pouvez faire afficher à l’écran la dernière 
touche sur laquelle vous avez appuyé. 

Vous devez cependant faire attention à la limite suivante vous ne 
pouvez faire mettre en mémoire plus de 1000 sons pour ne pas 
épuiser la capacité de mémoire disponible et pour éviter des 
complications lors de la sauvegarde. Surveillez donc le nombre de 
sons déjà mis en mémoire qui s'affiche dans l'angle supérieur 
gauche de l’écran. 


Vous pouvez définir la durée d’un son en tenant une touche appuyée 
plus ou moins longtemps. Il se produit toutefois une petite pause 
lors de la programmation qui disparaîtra lors de l'exécution de la 
mélodie. 


58 


Pour revenir au menu lorsque vous êtes dans le mode 1 
(programmation de mélodies), appuyez sur la touche ENTER. 


2. Vous pouvez ici sauvegarder une mélodie en en indiquant le nom. 
Les notes sont sauvegardées sous la forme d’une liste de variables 
que le mode 4 vous permet de recharger. Laissez toujours un certain 
espace entre deux mélodies différentes pour pas qu’elles ne se 
chevauchent et pour que vous puissiez les retrouver plus 
facilement. 


3. Ce mode vous permet de faire jouer la mélodie que vous venez de 
programmer ou de faire charger. Les notes sont jouées dans l’ordre 
où vous les avez entrées, sans pause. Pour programmer une pause, il 
faut appuyer en mode 1, lors de la programmation de la mélodie, sur 
la touche espace. 


4, Ce mode vous permet de faire charger une mélodie que vous pouvez 
ensuite faire exécuter en mode 3. Il n’est cependant pas possible 
de modifier une mélodie que vous venez de charger. Pour que ceci 
soit possible, il faudrait que vous modifiez légérement le 
programme. Vous devriez y arriver sans trop de difficultés une fois 
que vous aurez étudié le commentaire du listing de ce programme. 


Autre points susceptibles d’être améliorés: 

a) le programme ne travaille qu'avec un canal, ce à quoi vous 
pouvez remédier en ajoutant deux instructions SOUND et en étendant 
l'affectation des touches. 

b) vous n’avez aucune possibilité de modifier le volume en mode 


programme mais vous pouvez le faire avec le bouton de volume de 
votre CPC ou de votre chaîne stéréo. 


59 


Pour utiliser pleinement notre programme :il est recommandé de 
connecter le CPC à une chaîne stéréo car la sonorité ne sera pas 
sinon très bonne. 


Table d'affectation des touches: 


Touche Signification Commentaire 

note do 

do dièze 

note ré 

ré dièze 

note mi 

note fa 

fa dièze 

note sol 

sol dièze 

note la 

la dièze 

note si 

pause 

affichage touches activé la première fois, désactivé 
la seconde 


S>P ON mMeyRNE 


8 
TC 
Le] 
Q 
T © 


1 octave -3 numéro d’octave d’après la table 
du manuel 

2 octave -2 
3 octave -1 
4 octave 
S) octave 
6 octave 
7 octave 
8 octave 
9 octave non indiquée dans le manuel 
ER fin retour au menu 


Où & Yw ND = © 
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10 DIM ton (1000) 

20 MODE 2 

30 LOCATE 5,10: PRINT"Progranmer une melodie :1" 
40 LOCATE 5,12:PRINT'Sauvegarder une nelodie :2" 
50 LOCATE 5,14:PRINT"Jouer une nelodie 13" 
60 LOCATE 5,16:PRINT'Charger une melodie 4" 
70 LOCATE 5,20: INPUT" Votre choix"swa 

80 ON wa GOTO 100,490,330,390 

90 END 

100 CLS 

10 PRINTProgrammer une nelodie" 
120 n=0 

130 FOR toene=1 TO 1000 

140 a$=INKEYS:1F a$="" THEN 140 

150 a=a+(478 AND a$="c")+(426 AND a$="d") 

160 a=a+(379 AND a$="e")+(358 AND a$="f") 

170 a=a+(319 AND a$="g")+(284 AND a$="a") 

180 a=at(253 AND a$="b")+(451 AND a$="C") 

190 a=a+(402 AND a$="D")+(338 AND a$="F") 

200 a=a+(301 AND a$="G")+(268 AND a$="A") 

210 IF a$="p" AND pr=0 THEN pr=1:60T0 140 

220 IF a$="p" AND pr=i THEN pr=0 

230 IF a$=CHR$(13) THEN GOTO 20 

240 nn=VAL(a$):1F nn=0 THEN n=n ELSE GOTO 320 

250 IF pr=1 THEN PRINT af; 

260 ton(toene)={a#2n) 

270 SOUND i ,ton (toene) 

280 LOCATE 1,1:PRINT toene 

290 a=0 

300 NEXT 

310 GOTO 20 

320 n=4-nn:G60T0 140 

330 CLS 

340 LOCATE 5,15:PRINT"Ecoutez la nelodie" 

350 FOR n=1 TO toene 
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360 SOUND 1,ton(n) 

370 NEXT 

380 GOTO 20 

390 CLS 

400 LOCATE 5,5:PRINT'Charger une #elodie 
410 LOCATE 1,20 

415 INPUT'Non de la melodie"s;na$ 
420 OPENIN na$ 

450 INPUT#9,toene 

440 FOR n=1 TO toene 

450 INPUT#9,ton (N) 

460 NEXT N 

470 CLOSEIN 

480 GOTO 20 

490 CLS 

500 LOCATE 5,5:PRINT'S auvegarder une nelodie" 
510 INPUT'Non de la melodie"s;na$ 
920 OPENOUT na$ 

530 PRINT#9,toene 

540 FOR n=i TO toene 

550 PRINT#9, ton (n) 

560 NEXT 

570 CLOSEOUT 

580 GOTO 20 
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Commentaire du listing : 


lignes 20-90 
lignes 100-310 
ligne 130 

ligne 140 

lignes 150-230 
ligne 240 

ligne 250 

ligne 260 


ligne 270 
ligne 310 
ligne 320 


lignes 330-380 
ligne 350 
ligne 360 
ligne 380 
lignes 390-480 
ligne 420 
ligne 430 
ligne 440 
ligne 450 
ligne 470 
ligne 480 
lignes 490-580 
ligne 510 
ligne 520 
ligne 530 
ligne 540 


ligne 550 
ligne 570 
ligne 580 


:menu et choix du mode (1-4) 

:mode programmation 

‘ouverture de la boucle pour le nombre de notes 
‘interrogation du clavier 

‘évaluation de la touche enfoncée 

évaluer si octave a été changée 

‘affichage éventuel de la touche enfoncée 
‘écriture de la valeur dans la variable 
actuelle du tableau 

‘production du son par l'instruction SOUND 
‘retour au menu 

:changement de l’octave, retour au mode 
programmation 

:mode de jeu 

‘ouverture de la boucle pour le nombre de sons 
:ju de la note actuelle 

‘retour au menu 

:charger une mélodie 

‘ouverture d’un fichier d’entrée cassette 

‘lecture du nombre de sons 

‘ouverture d’une boucle de lecture des sons 
‘lecture des sons 

fermeture du fichier d’entrée cassette 

‘retour au programme principal 

sauvegarde d’une mélodie 

‘entrée du nom de la mélodie 

‘ouverture d’un fichier sortie cassette 

‘écriture du nombre de sons sur la bande 
‘ouverture de la boucle pour l'écriture des 
sons sur la bande 

‘écriture des différents sons sur la bande 
‘fermeture du fichier sortie cassette 

:retour au programme principal 
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3.8 PROGRAMMES EXEMPLES 


Les petits programmes suivants vous permettront d’ajouter à vos 
propres programmes les sons qui leur manquent. Nous avons choisi 
des exemples que vous pourrez intégrer sans difficultés dans nos 
deux jeux. Il vous sera également aisé de les modifier suivant vos 
besoins. 


Les titres de chaque programme correspondent à ce que nous avons 
entendu. Vous pouvez bien sûr les utiliser pour imiter d’autres 
sons. 


Une autre remarque : les numéros de ligne peuvent fort bien être 
modifiés, à condition bien sûr que vous pensiez à modifier 
également les numéros de ligne des instructions de saut, ce qui est 
très facile avec l'instruction RENUM dont dispose votre ordinateur. 


Vous pouvez enfin améliorer nos exemples en utilisant les 
enveloppes ou créer des dessins correspondant aux sons de nos 
exemples. Plus vous donnerez cours à votre imagination, meilleurs 
seront les résultats obtenus. 


10 REM POLICE 

20 FOR N=100 TO 200 STEP 10 
30 SOUND 1,N,2 

40 NEXT 

50 FOR N=200 TO 100 STEP -10 
60 SOUND 1,N,2 

70 NEXT 

80 GOTO 20 


10 REM OCCUPE 

20 SOUND 1,100,100,15 
30 SOUND 1,0,100 

40 GOTO 20 
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10 REM BATAILLE GALAXIALE 
20 FOR N=90 TO 125 STEP INTIRND(1)#10)+1 
30 SOUND 1,N,2,15 

40 NEXT 

50 SOUND 1,0, INT (RND(1)#20) 

40 GOTO 20 


10 REM GAMME 
20 FOR N=127 TO 450 STEP 12 
30 SOUND 1,N 

40 NEXT N 

50 FOR N=450 TO 127 STEP -12 
60 SOUND 1,N 

70 NEXT N 

80 GOTO 20 


10 REM EXPLOSION 
20 FOR N=15 TO 1 STEP -1 
30 SOUND 1,424,40,N,,,1 
40 NEXT 


10 REM ALARME 
20 FOR N=500 TO 100 STEP -15 
30 SOUND 1,N,4 

40 NEXT 

50 SOUND 1,0,30 

60 GOTO 20 


10 REM MELODIE FAVORITE 
20 ASINT (RND (1)#3500) +284 
30 SOUND 1,A 

40 B=INT (RND(1)#3400) +284 
50 SOUND 2,B 

80 C=INT (RND (1)#3300) +284 
70 SOUND 4,C 

80 60TO 20 
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10 REM TOUCHES LOINTAINES 
20 FOR N=100 TO 800 STEP 15 
30 SOUND 1,N,2,15 

40 NEXT 

50 FOR 121 TO 7 STEP 0.5 

80 SOUND 1,400,5,k, 551 

70 NEXT 

80 SOUND 1,0,50 

90 GOTO 20 


Le programme suivant répond au même principe que le programme 
musical "Oh when the saints". Ce programme joue la mélodie "Happy 
Birthday". Comme il ne comprend que des notes et des durées de 
notes, nous vous conseillons également de l’améliorer avec ENV et 
ENT pour obtenir une sonorité plus belle. 


10 REM happy birthday 

20 READ a,b 

SO IF b=-1 THEN END 

40 SOUND 1,a,b 

SO GOTO 20 

60 DATA 319,50,519,50,284,100,319,100,239, 100 
70 DATA 255,150,319,50,319,50,284,100,319,100 
80 DATA 213,100,239,150,319,50,319,50,159,100. 
90 DATA 190,100,239,100,253,100,284,100,179,50 
100 DATA 179,50,190,100,239,100,215,100,239,150 
110 DATA O,-1 


Commentaire du listing : 


10 titre 

20 lecture des notes et durées de notes 
30 demande si morceau terminé 

40 joue la note A de durée B 

50 retour en 20 

60-110 data de notes et durées de notes 


66 


3.8.1 REVEIL SONORE 


Pour vous distraire de nos explications parfois très théoriques sur 
la création du son avec le CPC, voici un programme que vous pourrez 
fort bien utiliser si vous faites partie de ceux qui ont un peu de 
mal à se lever le matin. Il s’agit d’une horloge digitale qui est 
conçue de façon à pouvoir vous réveiller à coup sûr. Elle émet un 
léger son pour marquer chaque seconde, un son plus fort pour 
marquer chaque minute et comme elle joue une petite mélodie pour 
marquer les heures, vos amis penseront certainement que vous avez 
une véritable horloge suisse. 


Notre horloge est encore simple mais vous pouvez en faire un second 
big ben si vous calculez les notes de morceaux de musique que vous 
souhaitez faire jouer par le réveil. Vous pouvez également vous 
faire réveiller par la mélodie ou par un son encore plus terrible 
que celui que nous avons choisi. 


Mode d'emploi: 


Après que vous ayez lancé le programme, on vous demande d’entrer 
l’heure actuelle dans l’ordre heures,minutes,secondes. 

Entrez ces valeurs l’une après l’autre, avec la touche ENTER. 

On vous demande alors l’heure du réveil. L’entrée se fait de la 
même façon. Si vous appuyez sur ENTER sans avoir tapé de chiffre, 
c’est à minuit (0 heure) que vous serez réveillé. 

Pour interrompre le signal du réveil, appuyez sur une touche. Le 
signal du réveil s’arrétera alors et l'horloge continuera à 
fonctionner normalement. 


Si vous constatez que l’horloge n’est pas exacte, modifiez en ligne 
150 le pas de l'instruction EVERY. Si l’horloge retarde, il faut 
que vous diminuiez la valeur suivant EVERY et que vous l’augmentiez 
au contraire si l’horloge avance. 
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10 MODE 2 

20 INPUT "heures "52 

30 INPUT "ainutes “;y 

40 INPUT "secondes";x 

50 INPUT "heure de reveil (h)",22 

60 INPUT “heure de reveil (#)",y2 

70 INPUT “heure de reveil (s)",x2 

80 MODE 0 

90 LOCATE 3,9:PRINT CHR$ (150) ; STRING (&D,CHR$ (154) ) :CHR$ (156) 
100 LOCATE 3,10:PRINT CHR$(149) :LOCATE 17,10:PRINT CHR$(149) 
110 LOCATE 3,11:PRINT CHR$(149) :LOCATE 17,11:PRINT CHR$ (149) 
120 LOCATE 3,12:PRINT CHR$(149):LOCATE 17,12:PRINT CHR$(149) 
140 LOCATE 3,13:PRINT CHR$ (147) ; STRINGS (&D,CHR$ (154) ) : CHR$ (153) 
145 LOCATE 7,5:PRINT "reveil " 

150 EVERY 50,2 GOSUB 170 

160 GOTO 160 

170 SOUND i,284,5,5:x=x+1 

180 IF x=60 THEN x=0:y=y+1: SOUND 2,71,5,6 

190 IF y=60 THEN y=0:z=2+1:G0SUB 270 

200 IF 2=z2 AND x=x2 AND y=y2 THEN GOSUB 320 

210 LOCATE 5,11:PRINT 2 

220 LOCATE 8,11:PRINT "1" 

230 LOCATE 9,11:PRINT y 

240 LOCATE 12,112:PRINT ":* 

250 LOCATE 13,11:PRINT x 

260 RETURN 

270 READ no 

280 IF no=-1 THEN RETURN 

290 SOUND 4,n0,30,7 

300 GOTO 270 

310 DATA 255,255,169,169,150,190,169,190,190,201,201,225,225,253,169,1 
69,190,190,201,201,225,169,169,190,201,201 

320 DATA 225,253,253,169,169,150,150,169,190,190,201,201,225,225,223,- 
1 


330 SOUND 7,100,1000,15 
340 IF INKEY$="" THEN 340 
350 SOUND 135,0 

360 RETURN 
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Commentaire du listing: 


lignes 10-80 


lignes 90-140 
ligne 150 


ligne 170 


ligne 180 


ligne 190 


ligne 200 


lignes 210-260 
ligne 270 
ligne 280 
ligne 290 
ligne 310 
ligne 320 
ligne 330 


ligne 340 


fixation du mode écran, entrée des valeurs 
nécessaires (h,m,s) pour l'heure et l’heure de 
réveil 


dessin du cadre de l’horloge 
l'instruction EVERY appelle à chaque seconde la 
routine 170 


production du signal des secondes et comptage 
d’une seconde 


interroge si minute atteinte; si oui, 
production du signal des minutes 


interroge si heure atteinte; si oui, production 
du signal des heures 


interroge si heure du réveil atteinte; si oui, 
saut à la sous-routine en 320 


affichage de l’heure dans le cadre 

lecture des notes 

interroge si fin de la mélodie atteinte 

joue la mélodie avec les trois canaux sonores 
ligne de data avec les valeurs de notes 
production du signal du réveil 

le programme attend ici qu’on appuie sur une 
touche 


ce type d'instruction SOUND : interrompt le 


signal du réveil et envoie un arrêt dans les 
canaux sonores. 
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CHAPITRE 4 LE LANGAGE MACHINE 


4.1 INTRODUCTION AU LANGAGE MACHINE 


Cette introduction n’est pas un cours exhaustif sur le langage- 
machine. Elle doit simplement vous permettre d’appréhender les 
techniques de programmation les plus sophistiquées que vous 
puissiez appliquer à votre CPC 464. Vous savez en effet 
certainement que certains problèmes de programmation, insolubles en 
BASIC, ne peuvent être résolus qu’au moyen de petites routines en 
langage-machine. Une routine de tri beaucoup trop longue en BASIC 
pourra, écrite en langage machine, prendre jusqu’à 100 fois moins 
de temps. 


Le cerveau de votre CPC 464 est un microprocesseur Z 80, un des 
microprocesseurs 8 bits les plus répandus dans le domaine des 
ordinateurs familiaux. Le Z 80 possède un jeu d'instructions de 
plus de 600 instructions dont nous ne pouvons vous donner une 
description complète dans le présent ouvrage. 
Le microprocesseur de votre CPC 464 travaille de manière digitale, 
c'est-à-dire qu’il ne peut, dans toute opération interne, 
distinguer que deux états, que nous pouvons nous représenter comme 
les états ALLUME ou ÉTEINT ou bien 1 ou 0. Un tel commutateur, qui 
ne peut donc représenter que deux états, ne permet pas d’aller bien 
loin. C’est pour cela que huit commutateurs sont toujours 
regroupés, à l’intérieur du microprocesseur, pour former un 
registre. On désigne un commutateur sous le nom de bit, alors qu’on 
appelle octet un groupe de huit bits. Un registre de 8 bits peut 
être ainsi représenté : 
76543210 
01101001 
A la ligne supérieure figure la numérotation des bits, qui va de 0 
à 7. En dessous, le contenu de chaque bit, soit 0, soit 1. Alors 
qu'un bit ne peut donc représenter que deux états, 8 bits peuvent 
déjà en représenter plus. Si nous comparons avec les nombres 
décimaux auquels nous sommes habitués, 
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3210 
5724 
nous avons, ici aussi, numéroté chaque chiffre, cette fois de O à 
3. Comment calculons-nous la valeur d’un tel nombre? Chaque chiffre 
a une valeur entre O0 et 9 qui représente une grandeur 10 fois plus 


importante chaque fois qu’on se déplace d’un chiffre vers la 
gauche: 


4 + 2*10 + 7*10*10 + 5*10*10*10 = 5724 


Nous pouvons procéder, avec le contenu de notre registre, de 
manière tout à fait analogue: on appelle de tels nombres, par 
opposition aux nombres décimaux, nombres binaires puisqu’un chiffre 
peut prendre, non pas 10, mais seulement 2 valeurs. Un chiffre plus 
à gauche ne représente donc plus non plus une valeur 10 fois mais 
seulement 2 fois supérieure. Nous pouvons maintenant calculer 
également la valeur du contenu de notre registre: 


1 + 0%2 + 0*2%2 + 1*2#2#2 + 0*2#2#2#2 
(1242624222. 118222 %242%2 4.0/2#242#2%2#282 


= 1+0+0 +8 +0 + 32 + 64 + 0 = 105 


Nous obtenons donc, comme contenu du registre, la valeur 105. Nous 
pouvons nous simplifier ce calcul laborieux en calculant d’abord 
une bonne fois les valeurs de chaque chiffre, de même que nous 
avons en tête les valeurs des chiffres des nombres décimaux. 


Chiffre Valeur 


02*0 = 1 
12*1 =2 
2272 = 4 
3273 = 8 
4274 = 16 
5275 = 32 
62*6 = 64 
7297 = 128 


Quelle peut être la valeur maximale du contenu d’un registre ? La 
valeur maximale est atteinte lorsque tous les chiffres ont la 
valeur 1, ce qui donne alors : 1 + 2 + 4 + 8 + 16 + 32 + 64 + 128 = 
255. La valeur la plus élevée qui puisse être représentée avec 8 
bits est donc 255. On peut ainsi représenter 2*8 = 256 valeurs 
différentes (de O0 à 255). 

Pour convertir les nombres binaires en décimaux il suffit d’entrer 
PRINT&xnombre binaire. Pour convertir les nombres décimaux en 
binaires il suffit d’entrer PRINT BIN$(nombre décimal) : 


PRINT&x01010101 
85 


PRINT BIN$(85) 
01010101 


Notez que les O0 placés avant le 1 le plus à gauche sont ignorés. 
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4.2 LE SYSTEME HEXADECIMAL 


La manipulation des nombres binaires reste toutefois très 
fastidieuse. C’est pourquoi a été introduit un deuxième système 
numérique, qui reste cependant en relation étroite avec les nombres 
binaires, mais qui permet une représentation des valeurs avec 
beaucoup moins de chiffres. Si l’on divise, en effet, un nombre de 
8 bits en 2 nombres de 4 bits, chacun des 2 nombres de 4 bits 
pourra représenter 16 valeurs différentes. Il suffit alors de créer 
un système numérique possédant 16 chiffres différents pour pouvoir 
exprimer, avec 2 chiffres de ce système, tout nombre binaire de 8 
chiffres. 

76543210 
01101001 
6 9 
Chaque octet est ainsi divisé en 2 demi-octets, également appelés 
quartets. Cependant, comme chaque quartet peut prendre une valeur 
allant de O à 15 et que notre système décimal ne comporte que des 
chiffres allant de O à 9, se pose le problème des chiffres devant 
représenter les valeurs 10 à 15. Ce problème a été résolu en 
prenant simplement les lettres À à F. Le système numérique ainsi 
réalisé a été appelé "hexadécimal". 
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Voici un tableau d'équivalence des trois systèmes évoqués: 


Binaire Hexadécimal Décimal 


0000 0 0 
0001 1 1 
0010 2 2 
0011 3 3 
0100 4 4 
0101 5 5 
0110 6 6 
O111 7 7 
1000 8 8 
1001 9 9 
1010 A 10 
1011 B 11 
1100 C 12 
1101 D 13 
1110 E 14 
1111 F 15 


Nous utiliserons essentiellement les nombres hexadécimaux parce 
qu’ils sont d’une part faciles à représenter et qu’ils sont 
aisément traduisibles en nombres binaires. Le système hexadécimal 
permet d’exprimer avec seulement deux chiffres les valeurs de tout 
groupe de 8 bits. 


Les nombres de deux octets (donc de 16 bats) sont divisés en deux: 
l’octet fort et l’octet faible (highbyte et lowbyte). Dans le 
nombre AIEI, Al sera l’octet fort (highbyte) et El l’octet faible 
(lowbyte). Pour calculer un nombre de 16 bits il suffit donc de 
calculer les valeurs de ses octets fort et faible puis de 
multiplier la valeur obtenue pour l’octet fort par 256 et de 
l’ajouter à la valeur obtenue pour l’octet faible: 


AIEI => octet fort = Al = 161 
octet faible = El = 225 
AIEI = 161*256+225 = 41441] 
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La formule est : octet fort * 256 + octet faible 


Bien sûr vous pouvez vous dispenser de faire ces calculs de 
conversion puisque votre CPC 464 dispose également de fonctions de 
conversion décimal-hexadécimal : 


PRINT HEX$(nombre décimal) 
et hexadécimal-décimal : 
PRINT&nombre hexadécimal 


Il y a toutefois une limite : cette fonction ne permet de convertir 
que les nombres hexadécimaux jusqu’à 7FFF car pour les nombres plus 
importants, 65536 est retranché du résultat ce qui donne un nombre 
négatif : 


PRINT&AIEI ne donne pas 41441 
mais -24095 (41441-65536=-24095),. 


Pour remédier à cet inconvénient, vous pouvez utiliser la routine 
suivante : 


10 INPUT A$:B$="&"+AS$:IF VAL(B$)<0 
THEN PRINT VAL(B$)+65536:END 
20 PRINT VAL(B$) 


Nous avons utilisé une variable alphanumérique pour que vous ne 
soyez pas toujours contraint d’écrire un "&"!. 


Imprégnez-vous bien de ces notions fondamentales d’octet fort et 
d’octet faible car nous les retrouverons très souvent dans la suite 
de cet ouvrage, notamment pour le calcul des adresses. C’est le 
même principe qui explique d’ailleurs que l'adresse la plus élevée 
soit 65535 puisque l’octet fort peut au maximum contenir 255 ainsi 
que l’octet faible. Une adresse sur deux octets peut donc au 
maximum valoir 255*256+255 = 65535. 
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4.3 TECHNIQUES DE PROGRAMMATION 


Plusieurs méthodes permettent de programmer en langage-machine à 
partir du BASIC: la première et la plus longue en temps consiste à 
POKEr les différents codes d’instruction dans les adresses voulues. 
Une méthode beaucoup plus pratique consiste à utiliser ce qu’on 
appelle un moniteur de langage-machine. Nous vous fournissons à la 
fin de ce chapitre un moniteur provisoire de langage-machine. Ce 
programme sera décrit en détail plus loin. 


En ce qui concerne la première méthode: vous savez que 
l'instruction POKE X,A écrit dans l’adresse X la valeur A. En 
langage-machine les instructions sont affectées à des adresses de 
la mémoire, comme elles le sont en BASIC à des numéros de ligne. Si 
vous voulez donc écrire un programme en langage-machine à partir de 
l'adresse &2000, il faut poker la valeur correspondant à la 
première instruction du programme dans l'adresse &2000 et les 
valeurs correspondant aux paramètres, s’il y a lieu, dans les 
adresses &2001 et &2002. Si la première instruction tient sur un 
octet, l’adresse &2001 contiendra déjà la seconde instruction. 


Les programmes en langage-machine ne se composent que de codes 
directement compréhensibles par l'ordinateur. À chaque instruction 
correspond en effet un ou plusieurs codes, ce qui fait qu’un 
programme en langage-machine n’est qu’une longue suite de chiffres 
qu’il faut entrer en mémoire-avec l'instruction POKE dans l’ordre 
correspondant à la suite logique des instructions. 


Pour lire le contenu d’une adresse de la mémoire de votre 
ordinateur, vous devez utiliser l'instruction PEEK(X). Le résultat 
obtenu est le contenu de l’adresse X. Pour lancer un programme déjà 
placé en mémoire, il faut utiliser l'instruction CALL X qui appelle 
le programme en langage-machine figurant à l’adresse X. 


Vous allez voir surgir dans les pages suivantes de nombreux 


problèmes qui ne doivent pas vous impressionner: nous n’avons pas 
nous non plus appris le langage-machine en trois jours. 
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ASSEMBLEUR 


L'assembleur est un langage de programmation qui utilise des 
abréviations symboliques à la place des codes véritables des 
instructions du langage-machine. Ces abréviations sont appelées 
"mnémoniques". Par exemple, l'instruction "load" est figurée par 
l'abréviation "Id". Comme la machine ne comprend que les codes 
binaires, il faut qu’un programme convertisse les mnémoniques 
d'instructions en nombres binaires. Un tel programme s'appelle un 
assembleur. Un assembleur permet en outre d’affecter aux adresses 
importantes des noms symboliques appelés labels (étiquettes). Les 
labels peuvent servir également à donner un nom aux variables que 
nous utilisons. 


Comme l’indique le manuel, la société Amstrad prépare un programme 
d'assembleur. 


REGISTRES ET PREMIERES INSTRUCTIONS 


Examinons tout d’abord la structure des registres du 
microprocesseur (cerveau de l’ordinateur): 


Je registre a, souvent appelé également accumulateur. Il sert 
essentiellement au stockage et au traitement des valeurs 
actuellement utilisées car il peut être employé de manière très 
polyvalente. 


de registre bc, ce qui signifie compteur d’octets (byte counter) 
sert souvent aux tâches de comptage. Il s’agit en fait d’un double 
registre puisqu'on peut appeler séparément les registres b et c qui 
le composent. Le registre bc, contrairement au registre a, peut 
donc admettre des nombres de deux octets (jusqu'à 65535). 


Je registre hl (highlow) est également un registre double qui 
sert essentiellement à stocker des adresses qui, comme vous le 
savez, sont des nombres 16 bits. Toutefois, il est également 
possible d’appeler séparément les deux registres dont il se 
compose. 
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Je registre de est un autre registre double important. Ce registre 
permet essentiellement de stocker des valeurs 16 bits, soit quand 
les autres registres doubles sont déjà occupés, soit tout 
simplement lorsqu'une instruction a besoin de trois double- 
registres. 


Lorsqu'on considère la structure du microprocesseur, on se demande 
tout d’abord comment une valeur déterminée peut être transférée de 
la mémoire dans un registre ou d’un registre dans un autre. Ceci 
est rendu possible par une instruction fondamentale, l'instruction 
de chargement Id (load): 


Id a,n charge la valeur n dans l’accumulateur. n est une entrée 
directe d’un octet. nn signifierait, bien sûr uniquement avec un 
registre double, une entrée immédiate également mais de deux octets 
(fort et faible). Si les deux nn sont entre parenthèses, celà 
signifie par contre qu’il ne s’agit plus d’une entrée directe mais 
que le contenu de l’adresse nn doit être chargé dans le registre 
considéré. 


Id hl,(&A000) signifie que le contenu de l’adresse A000 doit être 
chargé dans le double-registre hl1. 


Pour charger le contenu de l’accumulateur dans un autre registre, 
par exemple le registre c, il suffit d’entrer: Id ca. Le contenu 
antérieur du registre c sera effacé mais pas celui du registre a 
qui se retrouvera en outre dans le registre c. 


Pour programmer en langage-machine, on a besoin d’une zone de 
stockage protégée, qui ne puisse pas être effacée par un programme 
BASIC. La séquence d'instructions suivante vous permet de 
constituer au dessus de la mémoire BASIC une zone libre dans 
laquelle vous pourrez placer les routines que nous allons décrire 
dans les pages suivantes: 
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MEMORY &I1FFF:PRINT HIMEMNEW 


Si vous avez auparavant créé des caractères redéfinis, éteignez 
puis rallumez votre ordinateur pour les effacer car sinon vous 
pourriez avoir de petits problèmes. 


Vous avez maintenant une zone libre de 34 kilooctets pour vos 
programmes en langage-machine, mais il ne vous reste plus que 7.5 
kilo octets pour vos programmes en BASIC. 

Entrez maintenant: 

POKE &2000,&3E:POKE &2001,&FF:POKE &2002,&C9 


Les instructions POKE ci-dessus écrivent des instructions en 
langage-machine dans la mémoire. 

Les valeurs placées à la suite de l'instruction POKE sont les 
adresses dans lesquelles doivent être placées les instructions. 
Elles sont comparables aux numéros de ligne en BASIC. La valeur &3E 
est le code de l’instruction Id a,n. La valeur &FF est l’opérande n 
de cette instruction. La valeur &C9 est mise pour RET (RETURN) qui 
marque à la fin d’un programme en langage-machine l’ordre de 
retourner au BASIC. 


Lancez maintenant le programme avec CALL (&2000) 


Après un très court instant, l’ordinateur affiche READY et vous ne 
pouvez encore vous rendre compte de ce qui s’est passé. Pourtant la 
valeur &FF a bien été chargée dans l’accumulateur, mais ceci n’a 
pas d’effet direct sur l’ordinateur. 


Essayez maintenant d’entrer la routine: Id bc,&AIFI1 en entrant: 
POKE &2000,&1 (<=> Id bc,nn) :POKE &2001,&F1 (octet faible du 
nombre):POKE &2002,& A 1 (octet fort dunombre):POKE &2003,&C9 
(RET). 


Lancez maintenant le programme avec CALL (&2000) 
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Après un très court instant, l’ordinateur affiche READY et vous ne 
pouvez encore vous rendre compte de ce qui s’est passé. Pourtant la 
valeur &FF a bien été chargée dans l’accumulateur, mais ceci n’a 
pas d’effet direct sur l’ordinateur. 


Essayez maintenant d’entrer la routine: Id bc,&A1F1 en entrant: 
POKE &2000,&1 (<=> Id bc,nn) :POKE &2001,&F1 (octet faible du 
nombre):POKE &2002,& A 1 (octet fort dunombre):POKE &2003,&C9 
(RET). 


Vous ne voyez toujours aucune différence, mais la valeur &AIFI a 
bien été chargée dans le double-registre bc. Notez à ce propos une 
règle fondamentale de la programmation qui est que tout opérande 16 
bits d’une instruction doit toujours être présenté dans le format 
octet faible-octet fort (low-high). 


Essayons maintenant des routines plus utiles, par exemple un 
programme d’addition de nombres de 1 octet. 


Nous nommerons les deux octets à additionner ADDI et ADD2 et nous 
les placerons respectivement dans les adresses &3001 et &3002; le 
résultat ira en &3004. Il nous faut maintenant trouver une 
possibilité d’additionner ces deux valeurs. Nous allons placer ADDI1 
dans l’accumulateur, et l’adresse d'ADD2 dans le registre hl: Id 
a,(& 3000) et …d hl,&3002. Nous n’avons pas placé ADD2 directement 
en hl pour vous montrer les possibilités de la programmation. 


L’instruction d’addition est: add a,(hl). Le contenu de l’adresse 
se trouvant dans le registre entre parenthèses (hl) sera donc 
additionné à l’accumulateur. 

Pour placer le résultat, qui se trouve dans l’accumulateur, en 
&3004, nous avons l'instruction: Id (&3004),a. L’instruction RET 
nous permettra enfin de revenir au BASIC. Voici notre petit 
programme récapitulé avec les codes correspondants qu’il vous 
faudra ertrer en mémoire: 
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Id a,(&3000) &3A &00 &30 


ld hl,&3002 &21 &02 &30 
add a,(hl) &86 
Id (&3004),a &32 &04 &30 
RET &C9 


Voici maintenant un petit programme qui vous permettra d’entrer ce 
programme à partir du BASIC: 


10 FOR N=&2000 TO &200A 
20 INPUT VALEUR ‘ 

30 POKE N,VALEUR 

40 NEXT 


Il vous faut encore placer deux nombres (inférieurs à 128) dans les 
adresses & 3000 et &3001: POKE &3000,ADDI1:POKE &3001,ADD2. 


Entrez CALL &2000. Vous pouvez maintenant vérifier avec 
PEEK(&3004) que le résultat de l’opération a bien été placé en 
&3004. 


Examinons maintenant le fonctionnement de l'addition de codes 
binaires: 


ADDI vaut 127 et ADD2 64. 


ADDI= 01111111 
ADD2= 01000000 


RES = 10111111 = 191 en décimal 


Le principe est simple: si un bit d’une des deux valeurs à 
additionner est mis alors que le même bit de l’autre valeur n’est 
pas mis, le bit correspondant du résultat sera mis. Si les mêmes 
bits des deux valeurs ne sont pas mis, le bit correspondant du 
résultat vaudra également 0. 
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Si les mêmes bits des deux valeurs à additionner sont mis, le bit 
correspondant du résultat vaudra 0 mais une retenue se produira qui 
sera prise en compte pour l’addition du bit placé à gauche du bit 
actuel (voyez dans notre exemple les bits 6 et 7). Si la retenue se 
produit lors du calcul du bit 7, bit le plus à gauche, celleci ne 
sera pas prise en compte dans les opérations sur 8 bits mais elle 
le sera par contre pour les opérations sur 16 bits. C’est pourquoi 
dans l’exemple ci-dessus nous vous demandions de ne pas utiliser de 
nombres supérieurs à 127, afin d’éviter qu’une retenue puisse se 
produire. 


Essayons maintenant de réaliser une addition sur 16 bits. Il nous 
faudra tout d’abord deux adresses pour placer les valeurs à 
additionner: ADD1liraen&3001(ADRI)et&3000(ADRI1-1)etADD2ira 
en &3003 (ADR2) et &3002 (ADR2-I). Le résultat ira en &3005 (RES) 
et &3004 (RES-I). 


Notre programme additionnera tout d’abord les deux octets faibles 
de nos deux valeurs. Si une retenue se produit, le flag carry 
(signe de retenue) sera mis. Il sera exploité dans la seconde 
partie de notre programme. 


La seconde partie du programme additionnera les deux octets forts 
en prenant en compte une éventuelle retenue: 


Id a (ADRI) charge l’octet faible d'ADDI dans 
l'accumulateur 

Id hi, ADR2 charge l’adresse de l’octet faible d’ADD2 
dans le registre h1 

add a(hl) additionne les octets faibles entre eux 

Id (RES),a stocke l’octet faible du résultat en RES 

Id a(ADRI-1) charge  l’octet fort d’'ADDI dans 
l’accumulateur 

dec hl ôte 1 de h1 

adc a.(hl) additionne les octets forts et la retenue 

Id (RES-I),a stocke l’octet fort du résultat en RES-I 
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L’instruction dec hl a le même effet que Id hl,ADR-I. En effet 
cette instruction diminue de 1 le contenu de hl qui de ADRI devient 
donc bien ADRI1-I. L’avantage de l'instruction dec est qu’elle ne 
prend qu’un octet et est donc plus élégante et plus rapide. 


L’instruction adc a,(hl) a le même effet que add a (hl) si ce n’est 
qu’elle prend en compte en outre la retenue qui a pu se produire 
lors de la dernière opération. 


Voici maintenant à nouveau notre programme avec les codes 
hexadécimaux que vous devez entrer: 


Id a(&3001) &3A &l &30 
ld hl,&3003 &21 &3 &30 
add a,(hl) &86 
Id (&3005),a &32 &S &30 
Id a,(&3000) &3A 00 &30 
dec hl &2B 
adc a (hl) &8E 
ld (&3004),a &32 &4 &30 
RET &C9 


Entrez ce programme avec le petit programme BASIC que nous vous 
avons fourni après avoir ainsi modifié la ligne 10: 


10 FOR N=&2000 TO &2012 

Entrez maintenant en mémoire les valèurs à additionner en suivant 
le format octet fort-octet faible. Par exemple, pour entrer &5F4C 
et &8BSA: 

POKE&3000,&5F:POKE& 3001 ,&4CPOKE&3002,&8B:POKE&3003,&5 A 
Entrez ensuite CALL (&2000) puis: 

PRINT PEEK(&3004)*256+PEEK(&3005) 


Vous voyez maintenant apparaître le résultat, 60070 dans notre 
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exemple. 


Lors d’une addition sur 8 bits dont le résultat est supérieur à 
&FF, nous avons donc vu qu’une retenue se produit qui est placée 
dans le flag CARRY. Ce flag est un bit du registre f, un registre 
que nous n’avons pas encore évoqué. Ce registre contient toutes les 
informations essentielles dont le microprocesseur a besoin. Le flag 
carry est le bit O0 du registre f. 


Passons à une autre application en langage-machine: nous allons 
essayer de placer des points sur l'écran. Nous pouvons le faire en 
BASIC soit avec l'instruction PLOT soit en pokant les points 
directement dans la mémoire écran: 


10 MODE 2 

20 FOR N=&C000 TO &FFFF 
30 POKE N,&FF 

40 NEXT 


Vous voyez que l'écran se remplit, non pas ligne par ligne 
cependant, mais une ligne sur huit, conformément à la structure des 
caractères que nous avons décrite plus haut. 


Pour bien comprendre la logique du programme en langage-machine que 
nous allons vous présenter, il faut voir que la boucle ci-dessus 
peut fort bien être écrite ainsi: 


10 N=N+lI 
20 IF N=&FFFF THEN END 


On pourrait cependant écrire cette boucle en langage-machine même 
sous sa première forme mais ceci nous entraînerait à expliquer plus 
de nouvelles instructions que nous ne le souhaitons pour l'instant. 


Nous voulons donc charger &FF dans toute une série d’adresses de la 
mémoire. Nous utiliserons l'instruction Id mais pour ne pas 
réécrire l’instruction de chargement pour chaque adresse concernée, 
il nous faut créer une boucle, par exemple avec le registre b qui 
est facile à contrôler. 
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longueur représentera la longueur de la zone à remplir. 
adrl sera l’adresse de départ du remplissage. 


Nous créons la boucle avec: Id b, longueur. Nous plaçons ensuite 
&FF dans l’accumulateur. En plaçant ADRI en hl nous créons ce qu’on 
appelle un "pointeur", qui sera dirigé sur l'adresse de départ du 
remplissage. Nous chargeons ensuite le contenu de l’accumulateur 
&FF dans l'adresse indiquée par le pointeur hl. Il nous faut 
maintenant augmenter hl de 1 (inc hl) pour qu’il pointe sur 
l'adresse suivante à remplir. Nous devons également diminuer de 1 
le registre b (dec b) qui va nous servir de compte à rebours du 
nombre d’adresses à remplir. 


L'instruction suivante devra être un saut conditionnel 
correspondant au BASIC IF. THEN GOTO. Il nous faut en effet 
sauter à l'instruction Id (hl)a chaque fois que hl a été 
incrémenté. Le saut doit se faire tant que le registre b sera 
différent de O0, et donc tant qu’il restera des adresses à remplir. 
L'instruction adéquate est jp nz, adresse. jp signifie saut; nz 
signifie non zero; le saut se produira donc tant que le résultat de 
la décrémentation du registre b sera non nul. Notre programme doit 
être bien sûr terminé par un RET: 


Id b,&C0 &6 &C0 

Id a,0 &3E &FF 

id hl,&C000 &21 &O0 &C0 
Id (hl),a &77 

inc hl &23 

dec b &S 

jp nz,&2007 &C2 &7 &20 
RET &C9 


Entrez les codes avec le même programme que tout à l'heure, avec 
une boucle allant de &2000 à &200D. 


Avant de lancer leprogrammeavec CALL &2000,entrez MODE 2,même 
si vous vous trouvez déjà dans ce mode. 
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Vous voyez que trois lignes ont été dessinées par notre routine. 
L’instruction de saut jp (jump) saute à l'adresse où figure 
l'instruction Id (hl),a. Ceci est rendu techniquement possible par 
un autre registre très important du microprocesseur, le PC 
(programmcounter) ou compteur de programme. Ce registre contient 
l'adresse de la prochaine instruction à exécuter. L’instruction jp 
écrit donc dans ce registre l’adresse à laquelle on veut sauter. 


Une autre instruction de saut, l'instruction jr procède de manière 
légèrement différente: cette instruction soustrait en effet ou 
additionne au contraire suivant le cas le paramètre qui lui est 
affecté au compteur de programme. C’est ce qu’on appelle un saut 
relatif: jr e entraînera un saut à l’adresse actuelle plus ou moins 
le paramètre e. Ce chapitre n’étant qu’une introduction, nous nous 
cantonnerons ici à ces explications sommaires du fonctionnement des 
instructions de saut. 
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JEUX DE CARACTERES ET D’INSTRUCTIONS 


Voici une table des caractères et des mnémoniques de votre CPC avec 
les codes hexadécimaux et décimaux correspondants. 


Code Caract. Hex Assembleur Z 80 d’après CBh d’après EDh 


O0 Null 00 nop rlc b 

1 SOH 01 14 bc,NN rlc c 
2 STX 02 ld (bc),a rlc d 

3 ETX 03 inc bc rlce 
4 EOT O4 inc b rich 

5 ENQ 05 dec b rlc 1 

6 ACK 06 ld b,N rlc (hl) 
7 BEL 07 rlca rlc a 

8 BS 08 ex af,af" rrc b 
9 HT 09 add hl,bc rrc c 
10 LF OA 1d a,(bc) Irc d 
11 VT OB dec bc rrce 
12 FF OC inc c rrch 
13 CR OD dec c rrc l 
14 50 OE là c,N rrc (hl) 
15 SI OF rrca rrc a 
16 DLE 10 dinz DIS rlb 

17 DC 1 11 ld de,NN rl ce 

18 pC 2 12 ld (de),a rl d 

19 DC 3 13 inc de rle 
20 DC 4 14 inc d rlh 

21 NAK 15 dec d rl l 

22 SYN 16 l1d 4,N ri (hl) 
23 ETB 17 rla rl a 

24 CAN 18 ir DIS rr b 

25 EM 19 add hl,de Ir cC 

26 SUB 1A là a,(de) rr d 

27 ESC 1B dec de tre 

28 FS 1c inc e rrh 
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29 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
40 
41 
42 
43 
44 
45 
46 
47 
48 
49 
50 
51 
52 
53 
54 
55 
56 
57 
58 
59 
60 
61 
62 
63 
64 


© D J mn Un à YU NN + OO + : 


A 
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10 
1E 
1F 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
2A 
2B 
2C 
2D 
2E 
2F 
30 
31 
32 
33 
34 
35 
36 
37 
38 
39 
3A 
3B 
3C 
3D 
3E 
3F 
40 


dec e 

ld e,N 
rra 

jr nz,DIS 
ld hL,NN 
ld(NN),h1l 
inc h1 
inc h 

dec h 
ld,h,N 
daa 

jr z,DIS 
add h1l,h1l 
1d h1l,(NN) 
dec hl 
inc 1 

dec 1 

ld 1,N 
cpl 

jr nc,DIS 
14 sp,NN 
ld (NN),a 
inc sp 
inc (h1l) 
dec (h1) 
1d (h1),N 
scf 

jr c,DIS 
add h1,sp 
1d a, (NN) 
dec sp 
inc a 

dec a 

ld a,N 
ccf 

14 b,b 
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cr ] 
rr ( 
rr a 
sla 
sla 
sla 
sla 
sla 
sla 
sla 
sla 
sra 
sra 
sra 
sra 
sra 
sxra 
sra 
sra 


srl 
srl 
srl 
srl 
srl 
srl 
srl 
srl 
bit 


0O0B-hH>5;rmrAQANn 


Lea 


h1) 


LA 
re] 


in b,(c) 


65 
66 
67 
68 
69 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 
80 
81 
82 
83 
84 
85 
86 
87 
88 
89 
90 
91 
92 
93 
94 
95 
96 
97 
98 
99 
100 


DU PMNRKRKME<CHUUWMOMOZLEXUUME Q M M OU NAN W > 


a A v # 


41 
42 
43 
44 
45 
46 
47 
48 
49 
4A 
4B 
4c 
4D 
4€ 
4F 
50 
51 
52 
53 
54 
55 
56 
57 
58 
59 
5A 
5B 
5C 
5D 
SE 
5F 
60 
61 
62 
63 
64 


ld 
ld 
ld 
ld 
ld 
1d 
ld 
ld 
ld 
id 
ld 
ld 
ld 
ld 
ld 
ld 
là 
ld 
ld 
ld 
ld 
ld 
ld 
ld 
ld 
ld 
ld 
la 
ld 
ld 
ld 
ld 
ld 
ld 
ld 
ld 


b,c 
b,d 
b,e 
b,h 
b,1 


b,(h1) 


b,a 
c,b 
c,cC 
c,d 
c,e 
c,h 
c.l 


c, (h1l) 


c,a 
d,b 
d,c 
da,d 
d,e 
d,h 
d,1 


d,(h1) 


d,a 
e,b 
e,c 
e,d 
e,e 
e,h 
e,l 


e, (h1) 


e,a 
h,b 
h,c 
h,d 
h,e 
h,h 
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bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 


bit 


bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 


2,h 
2,1 
2,(h1) 
2,a 
2,b 
3,c 
3,4 
3,e 
3,h 
3,1 
3,(h1) 
3,a 
4,b 
4,c 
4,d 
4,e 
4,h 


out (c),b 
sbc h1,bc 
ld(NN),bc 
neg 

retn 

im O 


inc c,(c) 
out (c),c 
adc hl,bc 
ld bc, (NN) 


reti 


in d,(c) 

out (c),d 
sbc h1l,de 
lä (NN),de 


in 1 

ld a,i 

in e,(c) 
out (c),e 
adc h1,de 
ld de, (NN) 


im 2 


in h,(c) 

out (c),h 
sbc h1l,hl 
ld (NN),h1l 


101 
102 
103 
104 
105 
106 
107 
108 
109 
110 
111 
112 
113 
114 
115 
116 
117 
118 
119 
120 
121 
122 
123 
124 
125 
126 
127 
128 
129 
130 
131 
132 
133 
134 
135 
136 


NNKNXESEdtUuU HAT OS MX US. + 7 AQ M 0 


N HE 0 > 7 Q 


65 
66 
67 
68 
69 
6A 
6B 
6c 
6D 
6E 
6F 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 
7A 
7B 
7C 
7D 
7E 
7F 
80 
81 
82 
83 
84 
85 
86 
87 
88 


ld 
ld 
ld 
la 
ld 
ld 
ld 
ld 
ld 
ld 
ld 
ld 
ld 
ld 
ld 
la 
ld 
hal 
ld 
ld 


h,1 
h,(h1) 
h,a 
1,b 
l1,c 
1,d 
l,e 
1,h 
1,1 
1,(h1) 
l,a 
(h1),b 
(h1l),c 
(h1),d4 
(hl),e 
(h1),h 
Ch1l),1 
T 
(hl),a 
a,b 


id a,c 


ld 
ld 
ld 
l1d 
ld 
la 
add 
add 
add 
add 
add 
add 
add 
add 
adc 


a,d 
a,e 
a,h 
a,l 
a,(h1l) 
a,a 
a,b 
a,c 
a,d 
a,e 
a,h 
a,l 
a,(h1l) 
a,a 
a,b 
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bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
bit 
res 
res 
res 
res 
res 
res 
res 
res 


res 


4,1 
4,(Ch1) 
4,a 
5,b 
5,c 
5,d 
5,e 
5,h 
5,1 
5,(h1) 
5,a 
6,b 
6,c 
6,d 
6,e 
6,h 
6,1 
6,(h1l) 
6,a 
7,b 
7,c 
7,4 
7,e 
7,h 
7,1 
7,(h1) 
7,a 
0,b 
0,c 
0,4 
0,e 
0,h 
0,1 
O,(h1) 
0,a 
1,b 


rrd 

in 1,(c) 
out (c),1 
adc h1l,hl 
ld de, (NN) 


rld 


sbc hl,sp 
pd (nn);sp 


in a,(c) 

out (c),a 
adc h1l,sp 
la sp, (NN) 


137 
138 
139 
140 
141 
142 
143 
144 
145 
146 
147 
148 
149 
150 
151 
152 
153 
154 
155 
156 
157 
158 
159 
160 
161 
162 
163 
164 
165 
166 
167 
168 
169 
170 
171 
172 


+ ZM x A 


0 Z M »X © 
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8A 
8B 
8c 
8D 
8E 
8F 
90 
91 
92 
93 
94 
95 
96 
97 
98 
99 
SA 
9B 
9c 
93D 
9E 
9F 
AO 
A1 
A2 
A3 
A4 
A5 
AG 
A7 
A8 
A9 


AB 
AC 


adc 
adc 
adc 
adc 
adc 
adc 
adc 
sub 
sub 
sub 
sub 
sub 
sub 
sub 
sub 
sbc 
sbc 
sbc 
sbc 
sbc 
sbc 
sbc 
sbc 
and 
and 
and 
and 
and 
and 
and 
and 
xor 
xor 
xor 
xor 


xor 


a,c 
a,d 
a,e 
a,h 
a,l 
a,(h1l) 


a, 


a,(h1l) 


E] 
p 


PORC DER SEE OT 
re 
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res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
pdi 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 


res 


1, (h1) 
1,a 
2,b 
2,c 
2,d 
2,e 
2,h 
2,1 
2,(h1) 
2,a 
3;b 


3,c 


cpi 
ini 


outi 


ldd 
cpd 
ind 
outd 


173 
174 
175 
176 
177 
178 
179 
180 
181 
182 
183 
184 
185 
186 
187 
188 
189 
190 
191 
192 
193 
194 
195 
196 
197 
198 
199 
200 
201 
202 
203 
204 
205 
206 
207 
208 


AD 
AE 
AF 
BO 
B1 
B2 
B3 
B4 
B5 
B6 
B7 
B8 
B9 
BA 
BB 
BC 
BD 
BE 
BF 
co 
c1 

C2 
C3 
C4 
C5 
C6 
c7 
ca 
c9 
CA 
CB 
cc 
CD 
CE 
CF 
DO 


xor 1 

xor (h1l) 
xor a 

or 
or 
or 
or 
or 
or 
or 
or 
CP 
CP 
CP 
CP 
CP 
CP 
cp 
cp 
ret nz 


h1) 


Dh Pan h-rrmAanv 


pop bc 

jp nz,NN 
jp NN 

call nz,NN 
push bc 
add a,N 
rst O 

ret Zz 

ret 


jp z,NN 


call z,NN 
call NN 
adc a,N 
rst 8 


ret nc 
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res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
res 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 


set 


set 


set 
set 
set 
set 


SX 
5,(h1l) 
5,a 
6,b 
6,c 
6,d 
6,e 
6,h 
6,1 
6,(h1) 
6,a 
7,b 
7,c 
7,d 
7,e 
7,h 
7,1 
7, (h1) 
7,a 
0,b 
O,c 
0,4 
0,e 
0,h 
O,1 
O,(h1) 
O,a 
1,b 
1,c 
1,4 
1,e 
14,h 
1,1 
1,(h1) 
1,a 
2,b 


ldir 
cpir 
inir 


otir 


ldär 
cpdr 
indr 
otär 


209 
210 
211 
212 
213 
214 
215 
216 
217 
218 
219 
220 
221 
222 
223 
224 
225 
226 
227 
228 
229 
230 
231 
232 
233 
234 
235 
236 
237 
238 
239 
240 
241 
242 
243 
244 


Di 

D2 
D3 

D4 

D5 

D6 

D7 

D8 
D9 
DA 
DB 
DC 
DD 
DE 
DF 
EO 
E1 

E2 
E3 
E4 
E5 
E6 
E7 
E8 
E9 
EA 
EB 
EC 
ED 
EE 
EF 
FO 
F1 

F2 
F3 
F4 


pop de 

jp nc,NN 
out N,a 
call nc,NN 
push de 
sub N 

rst 16 

ret c 

exx 

jp c,NN 

in a, N 
call c,NN 
prefixe ix 
sbc a,N 
rst 24 
ret po 
pop h1l 

jp po, NN 
ex (sp),hl 
call po,NN 
push hl 
and N 

rst 32 

ret pe 

jp (h1l) 

jp pe, NN 
ex de,hl 
call pe,NN 


xor N 

rst 40 
xet p 

pop af 

jp P,NN 
di 

call p,NN 
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set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 


2,(h1) 
2,a 
3,b 
3,c 
3,d 
3,e 
3,h 
3,1 
3,(h1) 
3,a 
4,b 
4,c 
4,d 
4,e 
4,h 
4,1 
4,(h1) 
4,a 
5,b 
5,c 
5,d 
5,e 
5,h 
5,1 
5,(h1l) 
5, à 
6,b 
6,c 
6,d 
6,e 
6,h 


245 
246 
247 
248 
249 
250 
251 
252 
253 
254 
255 


F5 
F6 
F7 
F8 
F9 
FA 
FB 
FC 
FD 
FE 
FF 


push af 
or N 

rst 48 
ret m 

14 sp,hl 
jp m,NN 
ei 

call m,NN 
prefixe iy 
cp N 

rst 56 
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set 
set 
set 
set 
set 
set 
set 
set 
set 
set 
set 


6,1 
6,(h1) 
6,a 
7,b 
7,c 
7,4 
7,e 
7,h 
7,1 
7,{(h1) 


7,a 


4.4 LA MEMOIRE DU CPC 


Il est important de connaître la structure de la mémoire de votre 
ordinateur, de façon à ce que vous puissiez en tirer le maximum. 


Le CPC est doté d’un microprocesseur Z 80 qui est un processeur 8 
bits avec 16 canaux d’adresses qui lui permettent d’adresser 216 = 
65536 cases mémoire différentes, chacune comportant 8 bits et 
pouvant donc contenir 28 = 256 valeurs différentes. 


Le CPC contient 64 K octets de RAM et 32 K octets de ROM. Comme le 
processeur ne peut adresser que 64 K octets un commutateur permet 
au processeur de choisir s’il veut à un moment donné adresser la 
ROM ou la RAM qui figurent aux mêmes adresses. Il peut ainsi 
utiliser pleinement la capacité réelle de 96 K de votre ordinateur. 
Toutefois, dans les opérations d’écriture, le processeur choisit 
automatiquement la RAM puisqu'il n’est par définition pas possible 
d'écrire dans la ROM. 


Le CPC possède un composant de la ROM qui contient l’ensemble des 
32 K octets dont celle-ci se compose. Les 16 K octets inférieurs 
constituent le système d’exploitation (de 0 à &3FFF -16383). Les 16 
K octets supérieurs constituent l’interpréteur BASIC qui est placé 
de &C000 à &FFFF (49152 à 65535). 


Voici une figure illustrant ce principe: 
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CARTE DE LA MEMOIRE DU CPC 


BASIC 
RAM 

Q 

[el 

x 

TT um 

RS 

O 

= 

«4 

= 

© 

Z 


49152 


16384 


44.1 L’'OCCUPATION DE LA MEMOIRE PAR LE BASIC ET LE 
SYSTEME D'EXPLOITATION 


La plus grande partie de la mémoire RAM sert au stockage du 
programme BASIC en mémoire et de ses variables. Cette zone occupe 
normalement les adresses &170 (368) à &AB7F (&A67B sur les 
systèmes à lecteur de disquettes). Sa taille est donc de 43536 
{ou 42252) octets. 


Lorsque vous lisez la mémoire avec PEEK, vous obtenez toujours le 
contenu de la RAM. II n’est donc pas si facile de lire le contenu 
de la ROM. Le programme de moniteur que nous vous présentons plus 
loin vous permettra toutefois, entre autre, de le faire. 


Voyons maintenant comment est structurée la mémoire RAM : les 64 
premiers octets de cette mémoire sont une copie conforme de la même 
zone de la ROM qui contient les routines restart qui peuvent être 
appelées par une instruction sur un octet. Ces 8 vecteurs RST 
servent sur le CPC à appeler des routines de la RAM ou de la ROM. 
Ils choisissent automatiquement la bonne mémoire. La RAM contient 
une copie de ces routines de façon à ce que celles<i puissent être 
aussi bien exécutées lorsque la ROM est déconnectée que lorsqu’elle 
est connectée. 


Comme ces routines RST sont abondamment utilisées par le système 
d'exploitation ainsi que par l’interpréteur BASIC, nous allons en 
décrire quelques-unes. Vous trouverez d'autre part dans notre 
programme de moniteur une utilisation de la routine RST 3 qui 
permet de lire le contenu de la ROM. 
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4.5 LES INSTRUCTIONS RST 


RST O0 Adresse &0000 


Ce vecteur provoque un reset complet de l’ordinateur de même que la 
mise sous tension de l’appareil ou le fait d'appuyer simultanément 
sur les touches CTRL SHIFT ESC. 


0000 01 89 7F LD BC,&7F89 
0003 ED 49 OUT (C),C 
0005 C3 80 05 JP &0580 


L’instruction OUT sélectionne la ROM et saute à la routine &0580 de 
la ROM. 


Vous pouvez provoquer un reset en BASIC avec CALL 0, en langage- 
machine avec CALL 0, JP 0 ou RST 0. 


RST 1 Adresse &0008 


Cette instruction permet d’appeler une routine du système 
d’exploition ou de la RAM qui le double. Comme 14 bits suffisent 
pour la zone entre O0 et &3FFF, les deux autres bits servent à 
sélectionner la RAM ou la ROM: 


Bit 14 = 0 => sélection du système d'exploitation 
Bit 14 = 1 => sélection de la RAM 

Bit 15 = => sélection de la ROM BASIC 

Bit 15 = 1 => sélection de la RAM 


Par exemple, pour appeler la routine du système d’exploitation 
&0826, nous aurions: 


RST 1 
DW &0826 + &8000 
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Le bit 15 est mis par + &8000, ce qui sélectionne la zone entre 
&C000 et &FFFF, alors que le bit 14 est à 0, ce qui sélectionne le 
système d'exploitation au lieu de la RAM. Le code de l'adresse 8 
est uniquement un saut en &B982 sur CPC 464 et en &B98A sur CPC 664 
et 6128. 


RST 2 Adresse &0010 


Cette routine restart se compose d’un saut en &BA16 (&BAI1D sur 664 
et 6128) et permet d’appeler une routine dans une ROM d'extension. 
Après l'instruction RST 2 doit figurer l'adresse de la routine - 
&C000, c’est-à-dire l’adresse relative de cette routine par rapport 
au début de la ROM. Les deux bits supérieurs du paramètre 
permettent de sélectionner quatre ROM différentes. 


RST 3 Adresse &0018 


Cette routine comporte un saut en &B9BF (&B9C7 sur 664 et 6128). 
Elle permet d'appeler une routine figurant en n’importe quel 
endroit de la RAM ou de la ROM. Cette instruction doit être 
utilisée avec un bloc de paramètres comportant trois octets. Les 
deux premiers octets indiquent l'adresse de la routine et le 
troisième l’état ROM/RAM souhaité. Les valeurs 0 à 251 permettent 
d'appeler la ROM supplémentaire correspondante alors que les 4 
valeurs restantes ont les fonctions suivantes: 


Valeur &0000-&3FFF &CO000-&FFFF 
252 Système d’exploitation BASIC 
253 Système d’exploitation RAM 


254 RAM BASIC 
255 RAM RAM 


RST 4 Adresse &0020 
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Cette routine comporte un saut en &BACB (&BAC6 sur 664 et 6128). 
Elle permet de lire à partir d’un programme en langage-machine le 
contenu de la RAM, quel que soit l’état choisi de la ROM. 
L’instruction RST 4 remplace l'instruction LD A,(HL) 


HL doit donc contenir l’adresse de la case de la mémoire RAM à 
lire. 


RST 5 Adresse &0028 


Cette routine comporte un saut en &BA2E (&BA35 sur 664 et 6128). 
Elle permet de sauter à une routine du système d’exploitation. 
L'adresse doit être placée à la suite de cette instruction. 


RST 6 Adresse &0030 


Cette instruction RST n'est pas utilisée par le système 
d'exploitation et peut donc être librement définie par 
l'utilisateur, par exemple, dans un debugger, pour placer un point 
d’arrêt (breakpoint). 


RST 7 Adresse &0038 
Cette routine comporte un saut en &B939 (&B941 sur 664 et 6128). 
Comme le Z 80 fonctionne en mode d'interruption 1, l’apparition 


d’une interruption provoque un RST 7. Cette instruction traite 
l'interruption. 
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4.6 MINI-MONITEUR 


Voici maintenant un programme de moniteur qui vous permet de 
consulter les contenus de la mémoire, de les modifier ou de les 
stocker sur cassette. Une particularité intéressante de notre 
programme est qu’il vous permet d’accéder à la ROM BASIC et à la 
ROM système d'exploitation. Ceci se produit à travers les 
instructions RST. 


Voici maintenant, page suivante, le listing suivi de la description 
du programme. 
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Î PRINT “DATA BECKER" 

100 MEMORY &9FFF: INK 0,1: INK 1,24: INK 2,23: INK 3,15,24:M0DE 1 

110 n=6:FOR i=0 TO n:READ cmd#(i):NEXT: DATA a,m,sitoger,x 

120 GOSUB 830 

130 PEN 2:PRINT TAB(10)"M i ni -moni t e u r'CHR$(13)TAB(10) ; :PEN 


LEPRINT CHR$ (22) CHR$ (191 "a PRINT: PRINT 
140 PRINT:PRINT'I nstruction s:"CHR$(13)CHR$(22)CHR#(1)" 
Pb rr a "CHR$ (22) CHR$ (0) : PRINT 
150 PRINT" a = editer zone de la memoire 
160 PRINT" a = modifier contenu de la memoire 
170 PRINT" s = sauvegarder une zone de la memoire 
180 PRINT" t = entrer un texte ASCII 
190 PRINT" g = executer un programme en langage- machine 
200 PRINT" r = selectionner ROM/RAM 
210 PRINT" x = retour au BASIC 
220 PRINT 


230 PRINT:PRINT"Sortie sur "; 

240 PEN 3:PRINT"E"3;:PEN 1: PRINT'cran":PRINT TAB(9)"ou "5:PEN 3:PRINT"I 
"ssPEN L:PRINT'aprimante ?"; 

250 HHILE a$(2"e" AND a$C}"i":a$=INKEY$: HEND 

260 INK 3,24:rom=0 

270 PRINT:IF a$="d" THEN 1=16:c=8:60T0 310 

280 PRINT:PRINT:PRINT'Mode ecran ? 

290 WHILE a$<>"1" AND a$<)"2": a$=INKEYS$: HEND 

300 a=VAL(a$):L=a#B:c=0: IF a<21 THEN MODE a 

310 PRINT:PRINT" Instruction ? 

320 a$=INKEY$:FOR i=0 TO n:1F a$=cmd$(i) THEN PRINT:ON i+i GOSUB 490,5 
40,590,700,730,780,940:GOT0 310 

330 NEXT:G0TO 320 

340 ‘ 

350 IF ab THEN RETURN 

360 PRINTHC,HEX$(a,4)" "; 

370 FOR i=i TO 1: IF rom THEN GOSUB BSO:ELSE x=PEEK(a) 

380 PRINT#C,HEX$(x,2)" "ssa=ati 

390 NEXT:PRINT#c," "ssa=a-l 
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400 IF c=0 THEN 450 

410 FOR i=1 TO 1: IF rom THEN GOSUB B90:ELSE x=PEEK (a) 
420 x=x AND &7F 

430 IF x<32 OR x=127 THEN x=46 

440 PRINT#C,CHR$ (x) 5 sa=a+1:NEXT:PRINTHC:GOTO 350 

450 IF L=8 THEN PEN 2 

460 FOR 1=1 TO L:IF ROM THEN GOSUB 890:ELSE X=PEEK (A) 
470 PRINT CHR$(1)CHRS (X) 3 :A=A+1:NEXT:PRINT:PEN 1:G07T0 350 
480 ‘ 

490 INPUT"adresse ":x$:60SUB 560: a=x 

500 PRINT HEX$(a,4)":"s 

510 INPUT x$sa$=LEFT$(x$,1):1F a$<"0" OR a$>"9" AND a$<"a" OR a$>"#" T 
HEN RETURN 

520 GOSUB 560:POKE a,x:a=ati:G0TO 500 

530 ‘ 

540 GOSUB 650:G0SUB 350:RETURN 

390 ‘ 

560 x=VAL("&'"+x$)2 IF CO THEN x=x+216 

370 RETURN 

380 ‘ 

590 PRINT'Sauvegarder: "; 

600 GOSUB 650 

610 INPUT"Nom “;a$ 

620 SAVE a$,b,a,b-a 

630 RETURN 

640 ‘ 

650 INPUT"de - à ";a$,b$ 

b60 x$=a$:GOSUB 560: a=x 

670 x$=b$:GOSUB Sb0:b=x 

680 RETURN 

690 ” 

700 INPUT'Adresse ":x$:GOSUB 560 

710 LINE INPUT'Entrer texte: “;af 

720 IF LEN(a$)>0 THEN FOR izi TO LEN(a$):POKE x-1+i,ASC(MID$(a$,i,1)): 
NEXT 

730 RETURN 
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740 ‘ 

750 INPUT"'Adresse “:x$ 

760 GOSUB 560:CALL x:RETURN 

770 ‘ 

780 PRINT: INK 3,15,24 

790 PRINT'Selectionnez: “s:PEN 3:IF rom THEN PRINT'ROM";:ELSE PRINT'RA 
M"; 

800 PEN 1:a$=INKEY$:1F a$=" " THEN rom=i-rom:PRINT CHR$(13)::G0TO 790 
810 IF a$=CHR$(13) THEN PRINT: INK 3,24:RETURN:ELSE 800 
820 

850 ‘charger programme en langage-machine 

840 DATAkdf , 404, &ab ,&c9 

850 DATA&O7 ,&ab,&fc 

860 DATAKSa, 400,800 ,&32,80e, kab ,kc9 

870 FOR i=0 TO &D:READ a:POKE RAB0O+i ,a: NEXT:RETURN 
880 ‘ 

890 ‘lire la ROM 

900 ah=INT (a/256) :al=a-ah#256 

910 POKE &ABOB,al:POKE &AB09,ah 

920 CALL &AB00 

930 x=PEEK (&ABOE) : RETURN 

940 

950 CLS:END 
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Description du programme de mini-moniteur: 
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110 


130-140 


150-220 


230-260 


270-300 


310-330 


350-390 


400-470 


Diminution de la limite supérieure de la RAM BASIC, 
définition des couleurs et choix du mode écran 


Lecture des instructions qui sont placées dans cmd$ 


Edition du titre. Utilisation du mode transparent pour 
le soulignage 


Affichage du jeu d'instructions et des lettres 
permettant de les appeler 


Définition du périphérique de sortie pour 
l'instruction M 


Suivant ce que vous avez choisi, le nombre d’octets 
par ligne est fixé à 16 pour une sortie sur imprimante 
et le numéro de canal à 8. Si vous avez opté pour la 
sortie sur écran, vous pouvez encore choisir entres 
les modes 80 et 40 caractères. 


Boucle principale  d’attente des entrées. Les 
caractères entrés sont comparés aux commandes des 
différentes instructions et, en cas d'identité, on 
saute à la routine voulue. 


HEX-DUMP: une fois l’adresse entrée, 1 (8 ou 16) 
octets sont édités sous forme de nombres hexadécimaux. 
La lecture de la RAM peut se faire simplement par des 
PEEK mais la lecture de la ROM ne peut se faire que 
par la routine 890. 


ASCII-DUMP: pour l'édition des caractères ASCII 
correspondant au contenu d’une zone de la mémoire, on 
examine tout d’abord si la sortie doit se faire sur 
l'écran ou sur l'imprimante. Pour une sortie sur 
imprimante, on supprime le bit supérieur du caractère. 
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490-520 


540 


560-570 


590-630 


650-680 


700-730 


750-760 


Lorsqu'il s’agit d’un caractère de contrôle, celui-ci 
est remplacé par un point. Pour la sortie sur écran, 
tous les caractères sont représentés grâce à CHRS(1). 


Cette routine permet de modifier le contenu de la 
mémoire. Après que vous ayez entré une adresse, vous 
pouvez entrer son nouveau contenu. L'adresse suivante 
est alors automatiquement affichée et on attend votre 
nouvelle entrée. Vous pouvez sortir de ce mode en 
entrant un point. 


Les deux appels de sous-programmes traitent 
l'instruction M. 650 vous permet d’entrer les adresses 
de début et de fin de la zone à afficher et la seconde 
sous-routine réalise l’affichage. 


Cette routine transforme une suite de chiffres 
hexadécimaux en une valeur numérique et vous épargne 
ainsi d’avoir à utiliser le *&’. 


Cette routine vous permet d'effectuer une sauvegarde 
d’une zone de la mémoire sur cassette. Vous devez 
entrer les limites de la zone à sauvegarder ainsi que 
le nom que vous souhaitez lui donner. 


Cette routine vous permet d’entrer les limites d’une 
zone de la mémoire qui sont placées dans les variables 
a et b. 


Cette routine vous permet d'entrer un texte 
directement en mémoire. La ligne 720 poke le texte 
caractère par caractère en mémoire. 


Ces deux lignes vous permettent de faire exécuter un 


programme en langage-machine se trouvant en mémoire. 
Vous indiquez l’adresse du programme à exécuter. 
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780-810 Cette routine vous permet de sélectionner entre ROM et 
RAM. L'état actuellement sélectionné clignote. Pour 
passer de la ROM à la RAM et vice versa, il vous 
suffit d'appuyer sur la touche espace. Une fois l’état 
voulu sélectionné, appuyez sur ENTER. 


830-870 Le programme en langage-machine permettant de lire la 
ROM figure en lignes de DATA. La ligne 870 place ce 
programme dans l'endroit voulu de la mémoire. 


890-930 Ici se produit la lecture d’un octet de la ROM. 
L'adresse de l’octet à lire est placée dans la 
variable a. Cette adresse, divisée en octets fort et 
faible est placée dans la routine en langage-machine. 
Cette routine place le résultat de la lecture en & ABOE 
où il peut être lu par un PEEK. 


950 X provoque l’effaçage de l'écran et la fin du 
programme. 


Pour lire la ROM, nous utilisons une routine du système 
d’exploitation que nous appelons grâce à RST 3. La définition de 
l'octet à lire se fait simplement en pokant les octets fort et 
faible de l'adresse correspondante à la suite de l'instruction Id, 
à l'adresse READROM Ce n'est qu’ensuite que la routine est 
appelée. 


Voici maintenant deux exemples d’édition par le moniteur, le 


premier vous montre un exemple de contenu de la RAM (programme 
BASIC), le second un exemple de contenu de la ROM: 
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0160 
0168 
0170 
0178 
0180 
0188 
0190 
0198 
01A0 
0148 
01B0 
01B8 


01C0 
01C8 
01D0 
01D8 
O1E0 
01E8 
01F0 
01F8 
0200 


00 
00 
31 
AA 
01 
071 
01 
2C 
00 
EE 
OD 
20 


20 
OD 
01 
73 
78 
1D 
BB 
20 
20 


00 
00 
00 
01 
20 
20 
20 
19 
41 
EF 
OE 
OD 


03 
OE 
20 
2C 
00 
06 
20 
28 
69 


00 
00 
64 
20 
A2 
A2 
A2 
18 
00 
14 
00 
05 


09 
O0 
8c 
74 
OA 
OB 
10 
19 
20 


00 
00 
00 
A2 
20 
20 
20 
01 
6E 
20 
E9 
00 


00 
E9 
20 
2C 
00 
00 
01 
OA 
6E 


00 
00 
AA 
20 
OF 
10 
11 
20 
00 
07 
EF 
EE 


63 
29 
61 
67 
78 
6B 
20 
29 
20 
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00 
00 
20 
OE 
2C 
2C 
2C 
AD 
OD 
20 
OE 
01 


6D 
01 
2C 
2C 
00 
O0 
BF 
20 
69 


O0 
O0 
1cC 
2C 
19 
19 
19 
20 
05 
9E 
20 
20 


E4 
20 
6D 
72 
9F 
82 
20 
22 
20 


OF 
18 
17 
OF 
OF 
00 
20 
EC 
C3 


28 
BO 
2C 
2C 
20 
00 
EA 
AD 
2D 


1.4.* 
Ke — 
.A.n 
no. 
.i0. 1 
..n. C 
...cmd( 
.i). 0 
a,m;, 
SrtrQilr 
XX: 
.k... 
SNL 2) 
(..) "M 
in i- 


CO00 
co08 
c010 
co18 
co20 
co28 
co30 
co38 
co40 
co48 
CO50 
co58 
CO60 
CcoO68 
£070 
co78 


80 
co 
00 
1B 
CO 
CD 
BD 
FO 
42 
30 
C3 
co 
43 
00 
DC 
C3 


01 
CD 
00 
23 
CD 
CB 
CD 
O0 
41 
OA 
00 
CD 
CA 
Co 
B6 
3A 


00 
CB 
21 
36 
37 
DD 
D3 
CD 
53 
OA 
CD 
9A 
38 
CD 
BC 
45 


00 
BC 
00 
C9 
C3 
CD 
CO 
06 
49 
00 
E1 
E7 
54 
62 
CD 
AE 


AC 
CD 
AC 
10 
AF 
84 
CD 
F7 
43 
42 
CE 
CD 
CD 
c1 
48 
B7 
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CO 
C4 
36 
FB 
32 
CA 
3E 
18 
20 
41 
co 
63 
071 
CD 
BB 
C4 


31 
F4 
00 
21 
00 
CD 
c1 
25 
31 
53 
31 
E1 
AC 
D6 
CD 
3E 


00 
DA 
06 
3F 
AC 
97 
11 
20 
2E 
49 
00 
CD 
31 
DD 
86 
c1 


....L@1. 
MK<MDtZ 
.1.,6.. 
.#6I.;!7? 
@M7C/2., 
MKäM.JM. 
=MS@M) A. 
P.M.w.% 
BASIC 1. 
O...BASI 
C.MaNa@1. 
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LIGNES BASIC, VARIABLES 


5.1 FORMAT D’UNE LIGNE BASIC EN MEMOIRE 


Pour suivre ce chapitre, vous allez avoir besoin du programme de 
moniteur du chapitre 4. Le format des lignes BASIC ainsi que celui 
des variables vous montrera bien comment votre ordinateur passe du 
langage-machine à un langage évolué tel que le BASIC. 


Votre ordinateur ne peut en effet comprendre directement que des 
codes binaires. C’est le système d’exploitation ainsi que 
l’interpréteur BASIC qui transforment toutes les instructions BASIC 
en code binaire. Si vous écrivez la ligne BASIC : 


1 PRINT'DATA BECKER" 


votre ordinateur ne peut rien comprendre directement. Même avec 
l’interpréteur, votre ordinateur ne comprend pas tout et il vous le 
fait savoir, chaque fois qu’il affiche un *SYNTAX ERROR. 


Voyons tout de suite un exemple pratique : ajoutez au programme de 
mini-moniteur la ligne 1 PRINT "DATA BECKER". Lancez le 
programme et faites afficher la zone entre &170 et &183. 
Voici ce que vous obtenez (nous avons transcrit les résultats 
en décimal) : 
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ADRESSE 


368 


VALEUR 


20 


COMMENTAIRE 


octet faible de la longueur de ligne 
octet fort de la longueur de ligne 
octet faible du numéro de ligne 


369 
370 
371 
372 
373 
374 
375 
376 
377 
378 
379 
380 
381 
382 
383 
384 
385 
386 
387 


Examinons 


maintenant 


octet fort du numéro de ligne 


token pour PRINT 
valeur ASCII pour 
valeur ASCII pour 
valeur ASCII pour 
valeur ASCII pour 
valeur ASCII pour 
valeur ASCII pour 
valeur ASCII pour 
valeur ASCII pour 
valeur ASCII pour 
valeur ASCII pour 
valeur ASCII pour 
valeur ASCII pour 
valeur ASCII pour 
valeur ASCII pour 
code de séparation 


espace 
guillemet 
"D" 

"A" 

"T" 

"A" 
espace 
"B" 

"E" 

"C" 

"K'" 

"E" 

"R" 
guillemet 


la signification de tous ces 


longueur de la ligne BASIC est exprimée par deux octets: 


20 (octet faible) + 256 * 0 (octet fort) = 20 


codes: la 


Cette longueur de ligne correspond bien aux adresses dont nous 
avons exposé le contenu ci-dessus. 
Les deux octets suivants indiquent le numéro de ligne 1. 
Ensuite vient un token dont la signification vous sera expliquée 
dans la section suivante; puis viennent les codes ASCII pour le 


texte "DATA BECKER". 


Toutes les lignes de BASIC suivent ce format avec une exception 
notable cependant en ce qui concerne les lignes BASIC comportant 
une définition de variable. Nous reviendrons plus loin sur cette 


particularité. 
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5.2 LES TOKENS 


Le terme TOKEN signifie signe. Il désigne la valeur qui est 
affectée à chaque instruction BASIC de même qu’un code binaire est 
affecté à chaque instruction du langage-machine. L’intérét 
essentiel du token est un gain de place en mémoire BASIC. Si vous 
utilisez par exemple l'instruction PRINT dans un programme, 
l’'interpréteur BASIC remplacera les 5 lettres -5 octets- qui la 
composent, chaque fois qu’il les rencontrera (sauf si elles font 
partie d’un texte entre guillemets) par un code d’un octet appelé 
token. C’est d’ailleurs pourquoi il ne faut jamais utiliser les 
noms des instructions BASIC pour définir des variables. 
L’interpréteur les remplacera en effet toujours par le token de 
l'instruction correspondante. 


Voici maintenant une liste de tous les tokens n’utilisant qu’un 
octet. Cette liste n’est donc pas tout à fait complète puisqu'il 
manque les tokens de deux octets. 


Une dernière remarque cependant: la connaissance des tokens vous 
permet de faire modifier un programme BASIC par lui-même. Vous 
pouvez ainsi user d’un petit truc pour interdire par exemple que 
des utilisateurs mal intentionnés de vos programmes ne suppriment 
la ligne de COPYRIGHT qui vous permet de revendiquer la propriété 
de votre travail. 


Une ligne de copyright se présente ainsi: 
1 REM "COPYRIGHT 1985 BY DATA BECKER 


Si vous placez maintenant dans le seconde ligne de votre programme 
une instruction essentielle sans laquelle le programme ne peut pas 
fonctionner (par exemple une instruction DIM), vous pouvez ensuite 
insérer au milieu de votre programme une ligne POKE 372,191 qui 
remplacera le token du REM de la première ligne par le token de 
l'instruction PRINT. Si la ligne de copyright n'a pas été 
supprimée, tout se passera bien. Par contre si cette ligne manque, 
c'est la seconde ligne avec l'instruction essentielle au bon 
fonctionnement du programme qui se trouvera détruite. 


112 


After 
Auto 
Border 
Call 

Cat 
Chain 
Chain Merge 
Clear 
C1g 
Close in 
Close out 
Ccls 

Cont 
Data 

Def fn 
Def int 
Def read 
Def Str$ 
Deg 
Delete 
Dim 

Draw 
Drawr 
Edit 
Else 

End 

Ent 

Env 
Erase 
Error 


Every 


For 
Gosub 
Goto 


128 
129 
130 
131 
132 
133 
133&171 
134 
135 
136 
137 
138 
139 
140 
141 
142 
143 
144 
145 
146 
147 
148 
149 
150 
151 
152 
153 
154 
155 
156 
157 


158 
159 
160 


Mid 

Mode 
Move 
Mover 
Next 

New 

On 

On Break 
On Error goto 
On sq 
Open in 
Open out 
Origin 
Out 
Paper 
Pen 

Plot 
Plotr 
Poke 
Print 
Chr$(39) 
Rad 
Randomize 
Read 
Release 
Rem 
Renum 
Restore 
Resume 
Return 


Run 


Save 
Sound 


Speed 


113 


172 
173 
174 
175 
176 
177 
178 
179 
180 
181 
182 
183 
184 
185 
186 
187 
188 
189 
190 
191 
192 
193 
194 
195 
196 
197 
198 
199 
200 
201 
202 


203 
204 
205 


Tron 
Wait 
Wend 
While 
Width 
Window 
Write 
Zone 
Di 

Ei 
Erl 
Fn 
Spc 
Step 
Swap 
Tab 
Then 


+ 


+ << * 


And 
Mod 
Or 


211 
212 
213 
214 
215 
216 
217 
218 
219 
220 
227 
228 
229 
230 
231 
234 
235 
236 
237 
238 
239 
240 
241 
242 
243 
244 
245 
246 
247 
248 
249 


250 
251 
252 


1f 161 Stop 206 Xor 253 


Ink 162 Symbol 207 Not 254 
Input 163 Tag 208 Abs 255 
Key 164 Tag off 209 

Key Def 1648141 Troff 210 

Let 165 

Line Input 166&163 

List 167 

Load 168 

Locate 169 

Memory 170 

Merge 171 


Les valeurs 221 à 226 et 232 et 233 ne sont pas utilisées mais 
produisent un effet intéressant. Si vous créez en effet une ligne 1 
REM et si vous notez bien le numéro de la seconde ligne, vous 
pouvez encore une fois protéger votre programme contre une 
utlisation que vous n’avez pas autorisée. Il vous suffit pour celà 
d'entrer POKE 372,226. Alors les personnes non averties qui 
lanceraient votre programme  verraient défiler de manière 
ininterrompue le message syntax error in 1. Le seul moyen de 
retrouver le contrôle de l’ordinateur dans un pareil cas consiste à 
appuyer simultanément sur les touches CTRL, SHIFT et ESC ce qui 
provoque un RESET total et détruit donc également le programme en 
mémoire. 


Si vous utilisez cette méthode de protection, il faut que vous 
fassiez attention à ne pas lancer votre programme par un RUN mais 
par un RUN numéro de la deuxième ligne. Il ne faut pas non plus 
qu’il y ait dans votre programme des instructions de saut à la 
première ligne. 


Cette protection est d’autant plus efficace qu’elle empèche 
également le listage de la ligne où elle figure. 


Si vous voulez la supprimer, entrez POKE 372,197. 
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5.3 FORMAT DES VARIABLES 


Nous avons choisi 5 cas représentatifs de variables pour vous 
expliquer le format de ces lignes BASIC d'exception que sont les 
lignes avec variables. Ici encore vous aurez besoin du moniteur 
pour suivre nos développements. 


Chargez le moniteur puis entrez comme premier exemple la ligne 1 
C=100. 


Lancez le programme puis examinez la zone de la mémoire comprise 
entre 170 et 17B. Vous obtenez (en décimal): 


ADRESSE VALEUR COMMENT AIRE 
368 12 octet faible de la longueur de ligne 
369 0 octet fort de la longueur de ligne 
370 1 octet faible du numéro de ligne 
371 0 octet fort du numéro de ligne 
372 13 indique une variable numérique 
373 5 longueur du nom de la variable +4 
374 0 0 de séparation 
375 227 valeur ASCII du nom de la variable +128 
376 239 token de "=" 
377 25 grandeur de la variable 
378 100 valeur de la variable 
379 0 0 de séparation 


La signification des 4 premières valeurs est la même qu’au chapitre 
51; 


La valeur 13 en 372 n’est pas un token mais un code indiquant que 
ka variable à suivre est une variable numérique. Pour une variable 
alphanumérique, nous aurions le code 3. 


La valeur en 373 indique la longueur du nom de la variable + 4. Le 


0 qui suit n’a aucune signification autre que de séparation ainsi 
que le O en 379. 
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Le nom de la variable apparaît ensuite, codé ainsi tous les 
caractères du nom sont représentés par le code ASCII correspondant 
sauf le dernier caractère qui est représenté par son code ASCII + 
128. 


La valeur 239 en 376 est le token du signe égale. Ce n’est donc pas 
le code ASCII de "=" pour que l'ordinateur sache bien que le signe 
"=" ne fait pas partie du nom de la variable. La valeur suivante 
(25) indique la grandeur de la variable. Ici elle signifie que la 
valeur de la variable peut être codée sur un seul octet et qu’il 
s'agit d’un nombre entier. Vous trouverez plus loin un tableau des 
différents codes pour la grandeur des variables. 


Le 100 en 378 correspond enfin à la valeur de la variable. 
Deuxième exemple, entrez 1 C=1000. Lancez à nouveau le programme et 


faites afficher la zone entre 174 et 17C. Voici les valeurs 
décimales correspondantes: 


ADRESSE VALEUR COMMENTAIRE 
372 13 indique une variable numérique 
373 5 longueur du nom de la variable +4 
374 0 0 de séparation 
375 227 valeur ASCII du nom de la variable +128 
376 239 token de "=" 
377 26 grandeur de la variable 
378 232 octet faible de la valeur de la 

variable 

379 3 octet fort de la valeur de la variable 
380 0 0 de séparation 


Rien ne change jusqu’en 376 mais la grandeur de la variable est 
maintenant représentée par le code 26 qui indique que la valeur de 
cette variable est supérieure à 255 mais inférieure à 65536 et 
qu’elle est donc représentée par deux octets et que d’autre part il 
s’agit d’un nombre entier. 
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Voyons maintenant comment votre CPC code les variables numériques 
dont la valeur soit n’est pas un nombre entier, soit est supérieure 
à 65535. Entrez donc: 1 C=100000 


Listez la zone entre 174 et 17F. Le résultat en décimal est: 


ADRESSE VALEUR COMMENTAIRE 
372 13 indique une variable numérique 
373 5 longueur du nom de la variable +4 
374 0 0 de séparation 
375 227 valeur ASCII du nom de la variable +128 
376 239 token de "=" 
377 31 grandeur de la variable 
378 0 VAR I 
379 0 VAR 2 
380 80 VAR 3 
381 67 VAR 4 
382 145 VAR 5 
383 0 0 de séparation 


Le code 31 en 377 indique que la variable n’est pas un nombre 
entier ou qu’elle est supérieure à 65535. les 5 valeurs suivantes 
indiquent la valeur de la variable, selon la formule suivante qui 
est extrémement complexe et que vous n'êtes donc pas obligé de 
comprendre à tout prix: 


Valeur = ( 2 * (VAR 5 - 145)) * (65536 + (VAR 2/128) + 
(VAR 3 * 2) + (VAR 4 * 512) + (VAR 1 / 32800)) 
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CHAPITRE 6 ROUTINES UTILES 


6.1 LE MANCHE A BALAI UTILISE COMME SOURIS 


La souris est un de ces nouveaux concepts apparus pour rendre les 
programmes informatiques plus agréables et plus faciles à utiliser. 
La souris est un petit boitier avec une roulette et une touche que 
vous pouvez déplacer sur un document pendant qu’un symbole, le plus 
souvent une flèche, suit à l’écran le mouvement de votre souris. 
Vous pouvez avec ce symbole sélectionner différents champs de 
l'écran auxquels ont été affectées différentes fonctions que vous 
pouvez ensuite faire exécuter en appuyant sur le bouton de la 
souris. La souris remplace donc le clavier de l’ordinateur. Après 
un peu d'exercice vous pouvez même manipuler la souris beaucoup 
plus rapidement que le clavier, à moins cependant que vous ne 
tapiez à la machine avec vos 10 doigts. 


Il n'existe pas encore de souris pour le CPC, mais comme nous 
l'avons déjà fait dans notre programme de dessin, nous allons nous 
servir du joystick (manche à balai) en guise de souris. 


Pour que vous compreniez bien le fonctionnement de la souris, nous 
avons écrit quelques points du menu d’un programme de traitement de 
texte que vous allez pouvoir sélectionner en amenant avec votre 
joystick (Amstrad ou compatible Atari) le petit point qui nous sert 
de curseur dans le rond correspondant au point du menu que vous 
choisissez. 


Faites attention en recopiant le programme à bien taper le bon 
nombre d’espaces en lignes 30,50,70,90,110,130,150 et 170! 
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5 MODE 2 

10 CLS 

20 LOCATE 1,1 

30 PRINT'Creer le texte O" 

40 LOCATE 40,1 

50 PRINT'Examiner texte 0“ 

60 LOCATE 1,8 

70 PRINT'Modifier texte 0" 

80 LOCATE 40,8 

90 PRINT"Supprimer texte 0" 

100 LOCATE 1,17 

110 PRINT'Sauver texte 0" 

120 LOCATE 40,17 

130 PRINT"Charger texte 0" 

140 LOCATE 1,25 

150 PRINT'Inprimer texte 0" 

160 LOCATE 40,25 

170 PRINT'Fin de programme O" 

180 a=J0Y (0) 

190 PLOT x#8,400-y#16,0 

200 IF a=i THEN y=y-1 

210 IF y<i THEN y=25 

220 IF a=2 THEN y=y+l 

230 IF y>23 THEN y=1 

240 IF a=4 THEN x=x-1 

250 IF x<i THEN x=80 

260 IF a=B THEN x=x+1 

270 IF x>80 THEN x=1 

280 PLOT x#8,400-y#16,1 

290 IF a=16 THEN GOTO 300 ELSE GOTD 180 
300 IF x=18 AND y=1 THEN GOTO 400 
310 IF x=58 AND y=1 THEN GOTO 440 
320 IF x=18 AND y=8 THEN GOTO 480 
330 IF x=58 AND y=8 THEN GOTD 520 
340 IF x=18 AND y=17 THEN GOTD 560 
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350 IF x=58 AND y=17 THEN GOTO 800 
360 IF x=18 AND y=25 THEN GOTO 640 
370 IF x=58 AND y=25 THEN GOTO 680 
380 G60TO 180 

390 END 

400 ELS 

410 PRINT"Creer le texte" 

420 INPUT a$:1F a$(>"w" GOTO 420 
430 GOTO 10 

440 CLS 

450 PRINT'Examiner le texte" 

460 INPUT a$:1F a$<)"w" GOTO 460 
470 GOTO 10 

480 CLS 

490 PRINT'Modifier le texte" 

300 INPUT a$:1F a$<)"w" GOTD 500 
510 G60TO 10 
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Commentaire du programme: 


10-170 


180 


190 


200-270 


280 


290 


300-370 


380 


400- 


Affichage du menu 


La valeur du port joystick est placée dans une 
variable 


Suppression du petit curseur 


Routine de déplacement du petit curseur en fonction du 
mouvement du joystick. Le déplacement se fait en 
modifiant les valeurs des deux variables de 
coordonnées du joystick. Chaque fois, on doit 
contrôler si la valeur obtenue ne sort pas du cadre de 
l’écran pour éviter une erreur IMPROPER ARGUMENT. 


Fixation du petit curseur 


Si vous appuyez sur le bouton FIRE, le programme saute 
à la sous-routine correspondante, sinon le port 
joystick est à nouveau interrogé. 


Le programme saute ici lorsque vous appuyez sur le 
bouton FIRE. On examine alors où se trouvait le 
curseur lorsque vous avez appuyé sur le bouton FIRE. 


Retour à l'interrogation du port si vous avez appuyé 
sur le bouton FIRE alors que le curseur ne se trouvait 
pas dans un "O". 


Vous pouvez insérer ici les routines de votre 
programme. Nous n’avons écrit que quelques exemples. 
Faites attention à adapter les numéros de lignes lors 
de l’appel des routines. 
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Après avoir lancé ce programme, vous pouvez sélectionner un des 
points du menu qui vous sont proposés (à condition que vous ayez 
écrit toutes les routines sur le modèle que nous vous fournissons). 


Il y a maintenant deux améliorations importantes auxquelles vous 
pouvez vous attaquer: premièrement agrandir le curseur. Il vous 
faut pour celà travailler avec l'instruction LOCATE au lieu de 
travailler avec l'instruction PLOT. Vous pourriez ensuite essayer 
d'agrandir les ronds de sélection, de façon à ce qu’ils soient plus 
facile à atteindre. Il faut pour celà interroger en 300-370 une 
zone plus importante que celle que nous interrogeons. Le mieux est 
d'utiliser pour celà des instructions d’opération logique. 
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6.2 COMMANDE DU MOTEUR DU LECTEUR 
DE CASSETTE 


Les deux routines dont voici les adresses vous permettent de 
commander le moteur du lecteur de cassette: 


&BC6E Démarrage du moteur 
&BC71 Arrêt du moteur 


Pour faire démarrer le moteur il suffit donc d’entrer CALL &BC6E. 


Vous ne pouvez toutefois utiliser ces routines que si la touche 
PLAY est enfoncée. 


123 


6.3 PROTECTION ELEMENTAIRE CONTRE 
LES COPIES 


Si vous tenez à protéger vos programmes contre la copie, vous serez 
certainement très heureux d'apprendre que le CPC possède un 
dispositif de protection des programmes intégré! 


Il suffit en effet pour protéger un programme d’ajouter au nom du 
programme, lors de la sauvegarde, une virgule suivie d’un P. Un 
programme que vous aurez ainsi sauvegardé ne peut être chargé 
qu'avec l'instruction RUN. Il est alors chargé puis lancé 
automatiquement. Il n’est pas possible d’en lister le contenu ni de 
le sauvegarder à nouveau. En effet, si vous interrompez le 
programme, ce qui est possible, celui-ci se détruit 
automatiquement. 
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6.4 SAUVEGARDE D'’UNE ZONE DE LA 
MEMOIRE 


Nous attirons ici à nouveau votre attention sur deux possibilités 
très intéressantes dont nous avons déjà fait usage. La première 
consiste à sauvegarder certaines zones de la mémoire comme nous 
l'avons fait dans notre programme de moniteur. 


La seconde également très importante est la faculté de sauvegarder 
tout ou partie de l'écran ainsi que nous l’avons utilisée dans 
notre éditeur graphique. Ceci vous permet notamment de faire 
apparaître un dessin à l'écran beaucoup plus vite qu'avec les 
instructions BASIC de dessin du CPC. Pour plus de détails, nous 
vous invitons à vous reporter aux chapitres où ces problèmes ont 
déjà été évoqués. 
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6.5 REAFFECTATION DES TOUCHES 


Deux instructions KEY et KEY DEF permettent de modifier 
l'affectation des touches de votre CPC. Voici donc un programme qui 
vous permet de réaffecter les touches du clavier. Ce programme 
s’explique par lui-même. 
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10 MODE 2 

20 LOCATE 22,5:PRINTKE ŸY MANAGER" 

30 LOCATE 22,6: PRINT'sssssseneesssssesssset 

40 PRINT: PRINT: PRINT: PRINT: PRINT 

50 PRINT"Ce programme vous permet d'affecter au bloc de 10 touches de 
chiffres des fonctions speciales et de recreer d'autre part un c 
lavier AZERTY." 

40 PRINT: PRINT"Frappez une touche" 

70 CALL &BBI8 

80 CLS 

90 PRINT:PRINT'Les chiffres recoivent l'affectation suivante:" 

100 PRINT: PRINT: PRINT 

110 KEY 137,d$# 

120 PRINT'Touche 0 : LIST" 

130 PRINT"Touche 1 : RUN" 

140 PRINT" Touche 2 : LOAD" 

150 PRINT"Touche 3 : MODE" 

189 PRINT'Touche 4 : SAVE" 

170 PRINT"Touche 5 : EDIT" 

180 PRINT:PRINT: PRINT 

190 PRINT" Vous pouvez en outre affecter a 5 autres touches une sequenc 
e de 15 caracteres." 

200 INPUT'Pour ce faire, entrez un ‘d'";d$ 

210 IF d$="d" THEN GOTO 280 

220 CLS 

230 PRINT"Ce programme redefinit en outre le clavier d'apres Le foraat 
francais AZERTY." 

240 PRINT:PRINT: PRINT: PRINT 

230 PRINT'Frappez une touche" 

260 CALL &BBi9 

270 GOTO 350 

280 CLS 

290 INPUT"'Affectation de la touche b"sa$ 

300 INPUT'Affectation de la touche 7";b$ 

310 INPUT'Affectation de la touche 8"ic$ 
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320 INPUT'Affectation de la touche 9";d$ 
330 IWUT'"Affectation de la touche .";e$ 
340 GOTO 220 

350 KEY 128,"1ist"+CHR$ (13) 

360 KEY 129,"run"+CHR$ (13) 

370 KEY 130,"1oad"+CHR$ (13) 

380 KEY 131,"mode " 

390 KEY 132,"save"+CHR$ (13) 

400 KEY 133,"edit " 

410 KEY 133,a$ 

420 KEY 134,b$ 

430 KEY 135,c$ 

440 KEY 156,d$ 

450 KEY 137,e$ 

460 KEY DEF 67,1,97,85 

470 KEY DEF 59,1,122,90 

480 KEY DEF 69,1,113,81 

490 KEY DEF 29,1,109,77 

900 KEY DEF 71,1,119,87 

510 KEY DEF 38,1,58,42 
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6.6 ADRESSES D'APPEL DE ROUTINES 
INTERESSANTES 


Nous allons vous présenter dans les pages suivantes des adresses de 
routines du système d’exploitation que vous pouvez parfaitement 
intégrer dans votre programme, même si vous n'êtes pas un 
professionnel de la programmation en langage-machine; il suffit que 
vous ayez lu l’introduction au langage-machine que constitue le 
chapitre 4. Nous indiquons pour chaque routine sa fonction ainsi 
que les registres d’entrée-sortie correspondants ainsi, s’il y a 
lieu, que certaines particularités de chaque routine. Voici 
auparavant, à nouveau, le programme BASIC de chargement qui vous 
permet d'appeler toutes les routines: 


10 REM CHARGEUR BASIC 
20 MEMORY &2FFF:d=0 

30 INPUT"'VALEUR ":w 

40 IF w=0 THEN GOTO 80 
50 POKE &3000+d,w 

60 d-d+1 

70 GOTO 30 

80 CALL &3000 


Le programme de chargement en mémoire des routines d’appel de 
routines système est légèrement modifié par rapport à celui que 
nous vous donnions au chapitre 4.3. De cette façon vous pouvez 
charger n'importe quelle routine sans devoir spécifier chaque fois 
la longueur de la routine à charger. Le programme ne s’interrompt 
en effet que lorsque vous entrez un 0. Si vous devez placer un 0 en 
mémoire, modifiez le test en ligne 40. 


Si vous voulez intégrer des routines système dans le fonctionnement 
de vos programmes, placez les routines d’appel sous forme de lignes 
de DATA que vous pouvez faire lire et poker en mémoire grâce à des 
variables BASIC. 
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6.6.1 COLORIER UNE ZONE 


Adresse : BC44 (hex) 
48196 (déc) 


Cette routine permet de colorier des zones de l’écran. La grandeur 
de la zone dépend du mode écran choisi et des points-limites que 
vous pouvez choisir librement. 


Registres de transmission: a code couleur (voyez également le 
chapitre 2.10 sur la mémoire 
écran) 


h colonne limite gauche de la zone à 
colorier 


d colonne limite droite de la zone à 
colorier 


1 ligne limite supérieure de la zone 
à colorier 


e ligne limite inférieure de la zone 
à colorier 


Faites très attention à ne pas fournir comme valeurs limites des 
valeurs situées en dehors de l’écran car celà pourrait bien 
"planter" votre CPC. L’angle supérieur gauche de l'écran a la 
valeur 0,0. 


Registres de réponse: --- 
Valeurs hexadécimales pour le chargeur BASIC: 3E, code couleur, 21, 
limite supérieure, limite gauche, 11, limite inférieure, limite 


droite, CD, 44, BC, C9, 0 


Toutes les valeurs dont nous ne donnons que le nom (code couleur, 
limites, etc.) peuvent être définies arbitrairement. 
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Format assembleur: 


id a,N 

Id hINN 
ld de, NN 
call 44,BC 
ret 
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6.6.2 MODIFIER LA BANQUE ECRAN 


Adresse : BC06 (hex) 
48134 (déc) 


Cette routine permet de placer la mémoire écran dans l’une 
quelconque des 4 banques disponibles (0-3). Les seules possibilités 
intéressantes sont cependant la banque 1 ou la banque standard 3 
car la sélection d’une autre banque peut conduire à des conflits 
avec le système d’exploitation. 


Registres de transmission: a il faut placer dans l’accumulateur 
l'octet significatif (octet fort) de 
l'adresse où commence la nouvelle 
banque écran. 


Faites très attention à ne pas fournir d’autres valeurs comme 
paramètre que 00, 40, 80 ou CO car vous risqueriez d’aboutir à des 
résultats désagréables. 


Registres de réponse: Le 


Valeurs hexadécimales pour le chargeur BASIC: 3E,nouvelle adresse 
de la banque,CD,06,BC,C9,0 

Respectez bien les indications que nous vous donnons à propos des 
registres de transmission lors du choix des paramètres. 


Format assembleur: ld a,N 


call 06,BC 
ret 
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6.6.3 ATTENDRE LA FRAPPE D'UNE TOUCHE 


Adresse : BB06 (hex) 
48878 (déc) 


Cette routine interrompt le déroulement du programme juqu’à ce 
qu’une touche quelconque soit frappée. 


Registres de transmission: - - - 


Registres de réponse: a l’accumulateur contient le code de 
la touche enfoncée. 


Valeurs hexadécimales pour le chargeur BASIC: - - - 
Cette fonction peut être appelée en n’importe quel endroit de votre 
programme simplement par l’instruction CALL &BB06. 


Format assembleur: call 06,BB 
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6.6.4 SCROLLING 


Adresse : BC4D (hex) 
48205 (déc) 


Cette routine vous permet de déplacer la totalité de l’écran d’une 
ligne vers le haut ou le bas. La valeur de la couleur de Ia 
nouvelle ligne (PAPER) peut être choisie librement, dans le cadre 
des possibilités du mode écran choisi. 


Registres de transmission: b le registre b indique la direction du 
décalage, Un 0 indique un scrolling 
descendant, toute autre valeur un 
scrolling ascendant. 


a l’accumulateur indique le code 
couleur pour la nouvelle ligne créée. 


Registres de réponse: = 


Valeurs hexadécimales pour le chargeur BASIC: 
scrolling descendant: 6,0,3E,code couleur,CD,4D,BC,C9,0 
scrolling ascendant: 6,1,3E,code couleur,CD,4D,BC,C9,0 


Format assembleur: Id b,N 
Id a,N 
call 4D,BC 
ret 
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6.6.5 SCROLLING DE ZONES DE L'ECRAN 


Adresse : BC50 (hex) 
48208 (déc) 


Cette routine vous permet de décaler des zones partielles de 

l'écran (fenêtres). 

Registres de transmission: b le registre b indique la direction du 
décalage. Un 0 indique un scrolling 
descendant, toute autre valeur un 
scrolling ascendant. 


a l’accumulateur indique le code 
couleur pour la nouvelle ligne créée. 


h colonne limite gauche de la fenêtre 

d colonne limite droite de la fenêtre 

1 ligne limite supérieure de la fenêtre 

e ligne limite inférieure de la fenêtre 
Faites très attention à ne pas fournir comme valeurs limites des 
valeurs situées en dehors de l’écran car celà pourrait bien 
"planter" votre CPC. L’angle supérieur gauche de lécran a la 
valeur 0,0. 
Registres de réponse: --- 


Valeurs hexadécimales pour le chargeur BASIC: 


6, direction, 3E, code couleur, 21, limite supérieure, limite 
gauche, 11, limite inférieure, limite droite, CD, 50, BC, C9, 0 


Les limites ainsi définies de la zone à "scroller" ne sont en aucun 
cas dépendantes des fenêtres que vous aviez définies auparavant. 
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Format assembleur: 


ld b,N 

ld a,N 

ld hI,NN 
ld de, NN 
call 50,BC 
ret 
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6.6.6 SELECTION DU MODE ECRAN 


Adresse : BCOE (hex) 
48142 (déc) 


Cette routine vous permet de changer de mode écran en langage- 
machine. 


Registres de transmission: a l’accumulateur contient la valeur du 
nouveau mode sélectionné. 


La valeur de l’accumulateur doit bien sûr être entre O0 et 2. 
Registres de réponse: --- 


Valeurs hexadécimales pour le chargeur BASIC: 3E,nouveau 
mode,CD,E,BC,C9,0 


Format assembleur: Id a,N 


call OE,BC 
ret 
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6.6.7 INVERSION VIDEO D'UN CARACTERE 


Adresse : BC4A (hex) 
48202 (déc) 


Cette routine vous permet d’inverser un caractère défini par ses 
coordonnées (0,0 = angle supérieur gauche de l’écran). L’inversion 
se produit sur deux cartes bits grâce à un double EXCLUSIVE OR. 


Registres de transmission: b carte bits d’inversion 1 (couleur 1) 
c carte bits d’inversion 2 (couleur 2) 
h colonne 
l ligne 


Les paramètres dépendent bien sûr du mode choisi. 
Registres de réponse: --- 


Valeurs hexadécimales pour le chargeur BASIC: 6,carte bits 
1,E,carte bits 2,21,colonne,ligne,CD,4A,BC,C9,0 


Exemple: mode 1, couleur du caractère jaune, couleur du fond bleu. 
Le caractère à inverser se trouvant dans les coordonnées fournies 
est un 0. Examinons l’inversion des deux lignes supérieures de la 
carte bits de ce caractère. Comme carte bits d’inversion 1, nous 
choisissons "1000 0000" et comme carte bits d’inversion 2, "0000 
1111". 


Situation de départ 0111 0000 1100 0000 
Après l’inversion 1 1111 0000 0100 0000 
Après l’inversion 2 1111 1111 0100 1111 
Couleur du pixel RRRR RRRR BBRR BBBB 
R=rouge B=bleu 
Format assembleur: ld b,N 

ld c,N 

Id hI,NN 

call 4A,BC 

ret 
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6.6.8 SCROLLING HORIZONTAL DE L'ECRAN 


Adresse : BC0S (hex) 
48233 (déc) 


Cette routine vous permet de décaler la totalité de l’écran vers la 
gauche ou vers la droite. La colonne qui disparaît à gauche 


réapparaît à droite (wrap around). 


Registres de transmission: h  octet fort de la valeur de décalage 
1 octet faible de la valeur de décalage 


La valeur de décalage doit absolument être un nombre pair. 

Registres de réponse: --- 

Valeurs hexadécimales pour le chargeur BASIC: 21, octet faible de 
la valeur de décalage, octet fort de la valeur de décalage, CD, 5, 
BC, C9,0 

Format assembleur: Id hINN 


call 05,BC 
ret 
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6.6.9 POSITIONNEMENT DU CURSEUR 


Adresse : BB75 (hex) 
47989 (déc) 


Cette routine correspond à l'instruction BASIC LOCATE. 


Registres de transmission: h nouvelle colonne du curseur 
1 nouvelle ligne du curseur 


La routine ne vérifie pas si les valeurs fournies restent à 
l’intérieur de l'écran. 


Registres de réponse: --- 


Valeurs hexadécimales pour le chargeur BASIC: 21,nouvelle 
ligne,nouvelle colonne,CD,75,BB,C9,0 


Format assembleur: Id hINN 


call 75,BB 
ret 
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6.6.10 POSITIONNEMENT HORIZONTAL DU CURSEUR 


Adresse : BB6F (hex) 
47983 (déc) 


Cette routine vous permet de positionner le curseur à l’intérieur 
de la ligne sur laquelle il se trouve. 


Registres de transmission: a nouvelle colonne du curseur 


La routine ne vérifie pas si la valeur fournie reste à l’intérieur 
de l'écran. 


Registres de réponse: ets 


Valeurs hexadécimales pour le chargeur BASIC: 3E,nouvelle 
colonne, CD,6F,BB,C9,0 


Format assembleur: ld a,N 


call 6F,BB 
ret 
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6.6.11 POSITIONNEMENT VERTICAL DU CURSEUR 


Adresse : BB72 (hex) 
47986 (déc) 


Cette routine vous permet de positionner le curseur à l’intérieur 
de la colonne sur laquelle il se trouve. 


Registres de transmission: a nouvelle ligne du curseur 


La routine ne vérifie pas si la valeur fournie reste à l’intérieur 
de l'écran. 


Registres de réponse: --- 


Valeurs hexadécimales pour le chargeur BASIC: 3E,nouvelle 
ligne,CD,72,BB,C9,0 


Format assembleur: ld a,N 


call 72,BB 
ret 
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6.6.2 INTERROGATION DU JOYSTICK (MANCHE A BALAI) 


Adresse : BB24 (hex) 
47908 (déc) 


Cette routine permet de lire les valeurs des commutateurs des deux 
joysticks que vous pouvez connecter à votre ordinateur. 


Registres de transmission: - - - 


Registres de réponse: a l’accumulateur contient après 
l'interrogation le code correspondant 
à la position du joystick 
h idem 
1 idem mais pour le joystick numéro 2 


Tout bit allumé correspond à un contact. Les différents bits 
correspondent aux valeurs suivantes: 


bit O haut 

bit 1 bas 

bit 2 gauche 

bit 3 droite 

bit 4 fire 2 (bouton fire standard) 
bit 5 fire 1 

bit 6 inutilisé 

bit 7 inutilisé 


Valeurs hexadécimales du chargeur BASIC: CD,24,BB,32,octet faible 
fire 2,octet fort fire 2,7D,32,octet faible fire l,octet fort fire 
1,C9,0 

Après avoir appelé cette routine vous pouvez lire l’état des deux 
joysticks grâce à deux simples PEEK. 


Format assembleur: call 24,BB 
ld (NN),a 
ld a,l 
Id (NN),a 
ret 
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6.6.13 BRANCHER ET DEBRANCHER L’INVERSION 


Adresse : BB9C (hex) 
48028 (déc) 


Cette routine vous permet d’échanger les couleurs actuelles de 
PAPER et PEN. Un premier appel de cette routine réalise 
l'inversion, un second appel la supprime. Vous pouvez arriver au 
même résultat en BASIC avec PRINT CHRS(24). 

Registres de transmission: - - - 


Registres de réponse: --- 


Vous pouvez appeler cette routine simplement par 
CALL &BB9C 


Format assembleur: call 9C,BB 
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6.7 RANDOMIZE - 
A LA POURSUITE DU HASARD 


Votre CPC dispose de deux instructions vous permettant de recréer 
le hasard. La première est la fonction RND qui va chercher, chaque 
fois qu’elle est appelée la prochaine valeur d’une série de nombres 
aléatoires. Essayez l'exemple suivant après avoir déclenché un 
RESET général de votre ordinateur (CTRL-SHIFT-ESC): 


10 REM Hasardé 
20 FOR t=1 TO 5 
30 PRINT RND 
40 NEXT t 


Si vous comparez les chiffres obtenus avec la liste ci-dessous, 
vous constaterez qu’il n’y a aucune différence: 


0.271940658 
0.528612386 
0.021330127 
0.175138616 
0.657773343 


Vous voyez que la fonction aléatoire n’est qu’une fonction pseudo- 
aléatoire: la série de chiffres à laquelle elle fait appel, pour 
être arbitraire n’en est pas moins rigoureusement invariable et la 
fonction RND la lit du début après chaque initialisation de 
l'ordinateur. Si donc vous n'utilisiez dans vos jeux que cette 
seule fonction pour générer un soi-disant hasard, vous pourriez en 
assez peu de temps prévoir l’enchaînement des divers événements 
aléatoires censés agrémenter votre jeu. À la longue celà 
deviendrait très ennuyeux. 


C'est pourquoi il existe une autre instructions RANDOMIZE xx où xx 
est un paramètre vous permettant de faire commencer la lecture par 
RND du prochain nombre de la série aléatoire en un endroit calculé 
en fonction de ce paramètre. 
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Vous pouvez recommencer notre petite expérience avec ces nouvelles 
données: provoquez un RESET de l’ordinateur puis modifiez le 
programme Hasardé de tout à l’heure en y ajoutant la ligne: 


15 RANDOMIZE 33 


Lancez cette nouvelle version avec RUN et notez les chiffres 
auxquels vous aboutissez. Vous constatez un premier progrés: les 
chiffres obtenus sont différents de la liste que nous donnions plus 
haut. Donc si l’on ne connaît pas le paramètre de RANDOMIZE, on ne 
peut pas savoir par avance quels seront les chiffres tirés "au 
hasard". 


Ce progrès reste cependant très mince car vous pouvez constater que 
si vous provoquez à nouveau un RESET et que vous lancez à nouveau 
la nouvelle version du programme Hasardé avec RANDOMIZE 33 vous 
aboutirez aux mêmes chiffres que vous venez de noter. Pour recréer 
véritablement une situation de hasard, il faut faire appel à des 
facteurs qui ne puissent être appréhendés directement par un être 
humain. Le plus simple est d’utiliser l'horloge de l'ordinateur. 
L’horloge marque le temps qui s’est écoulé depuis l’allumage de 
votre ordinateur. Ce temps est mesuré en unités de 3/100 secondes. 


Il est donc possible d’affecter à l'instruction RANDOMIZE un 
paramètre dépendant du temps qui s’est écoulé depuis la mise sous 
tension de votre ordinateur, temps qui constitue, surtout calculé 
de manière aussi précise, un facteur que vous ne pouvez connaître, 
Voici comment nous pouvons maintenant, à l’aide de l’horloge de 
l'ordinateur et de ses deux instructions pseudo-aléatoires, recréer 
le hasard: 


10 REM Hasard 

15 RANDOMIZE TIME 
20 FOR t=1 TO 5 

30 PRINT RND 

40 NEXT t 
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La ligne essentielle de cette nouvelle version de notre programme 
Hasard est la ligne 20 qui utilise la fonction RANDOMIZE avec la 
variable système TIME qui contient le temps de l’horloge de votre 
ordinateur. 


Les nombres fournis par la fonction RND sont toujours supérieurs à 
0 et inférieurs à 1. Pour obtenir des nombres entiers dans le cadre 
qui vous intéresse, il faut que vous appliquiez aux nombres 
renvoyés par la fonction RND la formule suivante: 


nombre aléatoire = INT (RND * (limite supérieure - limite 
inférieure + 1})) +limite inférieure. 


Par exemple si vous voulez un nombre compris entre 2 et 12: 


Vous calculez d’abord le nombre de possibilités: 12 (limite 
supérieure) - 2 (limite inférieure) + 1 = 11. 


Il y bien en effet 11 nombres compris entre 2 et 12 inclus. Vous 
multipliez donc 11 (nombre de possibilités) par RND (nombre pseudo- 
aléatoire) et vous obtenez un nombre entre O0 et 10 que vous 
arrondissez grâce à la fonction INT. Vous ajoutez ensuite 2 (limite 
inférieure) à ce nombre et vous obtenez un nombre parfaitement 
aléatoire compris entre 2 et 12. 
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6.8 LE CPC COMME CALCULATRICE 


Le seul but recherché par les constructeurs des premiers 
ordinateurs était de réaliser des machines qui puissent effectuer 
les calculs les plus compliqués beaucoup plus rapidement que les 
hommes. Bien que tout ordinateur garde toujours la faculté de 
remplir cette fonction, cette caractéristique est toutefois 
secondaire, en ce qui concerne les ordinateurs domestiques, par 
rapport aux autres possibilités de ces ordinateurs. Nous allons 
malgré tout, dans cette section, essayer de donner quelques idées à 
ceux qui utilisent le CPC avant tout pour effectuer des calculs. 


Nous allons tout d’abord vous montrer comment transformer votre 
ordinateur en une "calculatrice de poche", si ce n’est par la 
taille, du moins par la facilité d’utilisation. Nous allons 
simplement redéfinir à cet effet le clavier de façon à ce qu’aucun 
calcul ne nécessite l’emploi de la touche SHIFT (pour les 
opérateurs) et que d’une manière générale tout calcul puisse 
s'effectuer sans utiliser aucune combinaison de deux touches 
différentes. 


Si celà ne vous gène pas de ne pouvoir utiliser que les chiffres 
situés au-dessus des lettres, vous pouvez également taper les 
lignes 200 et suivantes de notre programme qui affectent au bloc de 
chiffres les fonctions (SIN(X)};,COS(X) que vous trouvez sur une 
calculatrice normale. 


L'utilisation du programme est très simple. Dès que vous l’avez 
lancé, vous voyez apparaître le message "MODIFICATIONS 
EFFECTUEES" qui indique que toutes les touches comportant un 
opérateur arithmétique peuvent être utilisées sans SHIFT. D’autre 
part la touche P s’est vu affecter le ? ce qui vous permet d’entrer 
plus rapidement l'instruction PRINT. 
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Voici une table de ces modifications: 


Signes mathématiques Touche Valeur de la touche 
+ 29 
+ : 28 
( 17 
) 19 
& 26 
SIN( 0 128 
COS( 1 129 
TAN( 2 130 
ATN( 3 131 
ABS( 4 132 
INT( 5 133 
HEXS( 6 134 
BINS( 7 135 
STRS( 8 136 
? P 27 


Si vous voulez vous servir régulièrement de ce programme, nous vous 
conseillons de coller sur les touches modifiées de petites 
étiquettes indiquant leur nouvelle fonction de façon à ce que vous 
n'ayez pas à les chercher sans cesse. 


10 REM calculatrice de poche 
20 MODE 2 

30 KEY DEF 29,1,42 

40 KEY DEF 28,1,43 

50 KEY DEF 17,1,40 

60 KEY DEF 19,1,41 

70 KEY DEF 26,1,38 

80 KEY DEF 27,1,63 

90 GOSUB 200 

100 PRINT'MODIFICATIONS EFFECTUEES" 
110 END 
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200 KEY 128,"sin(" 
210 KEY 129,"cos(" 
220 KEY 130,"tan(" 
230 KEY 131,'atn(" 
240 KEY 132,"abs(" 
250 KEY 133,'int(" 
260 KEY 134,"hex$(" 
270 KEY 135,"bin$(" 
280 KEY 136,"str$(" 
290 RETURN 


Commentaire du listing: 


10 
20 
30-80 


90 


100 
110 
200-280 
290 


Titre 

Passage en mode 80 caractères 

KEY DEF permet de modifier l’ordre des touches 
comportant des opérateurs mathématiques 

Saut à la sous-routine 200. Vous pouvez supprimer 
cette ligne si vous ne voulez pas de la sous-routine 
200. 

Edition du message 

Fin du programme 

Redéfinition des touches du bloc des chiffres 

Retour au programme principal 
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6.8.1 PRECISION DE CALCUL 


La précision de calcul d’un ordinateur est fonction du nombre de 
chiffres après la virgule qui correspondent aux chiffres du nombre 
réel. Un ordinateur qui renvoie 3.1416 pour PI n’a pas une grande 
précision de calcul. 


Votre CPC ne peut stocker correctement "que" neuf chiffres avant ou 
après la virgule, ce qui signifie que pour des nombres comportant 
plus de chiffres, l’imprécision sera supérieure à 1. 


Un exemple; entrez: PRINT SE9+1-SE9 


Vous attendiez certainement que votre ordinateur réponde 1 mais 
vous voyez qu’il a répondu 2. Il y a donc une imprécision de 1. 


Le plus grand nombre qui puisse être stocké correctement est: 
232-1 = 4294967295 


Cette relative imprécision tient au mode de stockage des variables 
que nous avons décrit au chapitre 5. 


Pour augmenter la précision de calcul, vous pouvez utiliser des 
formules à la place des valeurs dont vous avez besoin. Il faut 
cependant faire attention à ne pas employer de constantes telles 
que les racines ou À car celles-ci ne font que nuire à la précision 
de calcul. 


Nous avons créé un programme à partir d’une telle formule pour vous 
montrer comment vous pouvez introduire vos formules propres dans 
vos programmes sans utiliser la fonction DEF FN qui ne peut pas 
être employée dans tous les cas. Notre formule calcule EXP (X) de 
la façon suivante: 


EXP(X)=1+X/14+X"2/2#X"3/3 
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Notre programme vous permet d’élever la ligne supérieure jusqu’au 
facteur 31. Ensuite on atteint le plafond 1E34,. 

Cette fonction que ne possède pas votre CPC est simulée par la 
routine 100. 


Pour utiliser le programme, il suffit d’entrer la valeur X voulue 
et vous voyez s'afficher après un court temps de calcul la valeur 
EXP(X). 


10 REM EXP(x) 

20 INPUT"x-VALEUR";x 
30 FOR n=1 TO 31 
40 x1=x°n 

50 GOSUB 100 

60 ergl=x1/fa 

70 erg2=erg2+ergl 
80 NEXT 

90 PRINT erg2+1 
95 END 

100 fa=1 

110 FOR m=1 TO n 
120 fa=fa*m 

130 NEXT m 

140 RETURN 
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Commentaire du programme: 


10 titre 

20 entrée de la valeur X 

30 ouverture de la boucle qui définit le nombre de facultés 
40 constitution des puissances de X 

50 saut à la sous-routine 100 

60 traitement des facultés 

70 addition du résultat 

80 fermeture de la boucle 

90 édition du résultat 

95 fin du programme 

100 rétablissement de la faculté 

110 ouverture de la boucle pour la faculté 


120 formule de calcul de la faculté 
130 fermeture de la boucle 
140 retour au programme principal 


Une formule telle que celle de EXP(X) peut difficilement être 
définie avec une instruction DEF FN car les 31 parties ne peuvent 
entrer dans l’instruction DEF FN. 

Un autre exemple d’application des formules est le calcul des 
points 0. Les points O sont les points de rencontre entre la courbe 
d'une fonction et l’axe des X. Ce sont des points très importants 
pour l’analyse de la courbe d’une fonction qui ne peuvent être 
dégagés que très imprécisément du seul dessin. 

Voici un exemple de calcul de points 0 avec une équation carrée: 
F(X)=X"2+P#*X+Q 

La formule de calcul des points 0 est: 

X1= -P/2+SQR(P"2/4*Q); X2= P/2-SQR(P"2/4*Q) 


Vous devez entrer d’abord la valeur de P, puis celle de Q et le 
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programme vous donnera la valeur des points 0 (X1,X2). 


10 INPUT p 

20 INPUT q 

30 x1= -p/2+SQR(p*p/4-q) 
40 x2= -p/2-SQR(p*p/4-a) 

50 IF x1*x2<>q THEN 80 

60 PRINT x1,x2 

70 END 

80 PRINT"Pas de points zeros" 
90 END 


Commentaire du listing: 


10 entrée de p 

20 entrée de q 

30 calcul du premier point 0 

40 calcul du second point 0 

50 vérification des points O d’après le théorème de Vieta 
60 édition des points 0 

70 fin du programme 

80 affiche qu’il n'y à pas de points 0 


Si le programme est interrompu par un message d’erreur, c’est qu’il 
n’y a pas de points 0. 
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6.8.2 VITESSE DE CALCUL 


La vitesse de calcul constitue une caractéristique importante d’un 


ordinateur. Elle permet à l'utilisateur d’évaluer correctement les 
possibilités de son ordinateur. 


On calcule généralement la vitesse de calcul grâce à un programme 
de test que l’on fait tourner sur différents ordinateurs. On peut 
ainsi effectuer des comparaisons valables et voir ainsi quel 
ordinateur convient le mieux à une application donnée. 


Les tâches standard qu’on fait exécuter par les ordinateurs pour 
calculer leur vitesse portent le nom générique de tests BENCHMARK. 
Nous avons utilisé un tel test dans ce chapitre en suivant une 
méthode très répandue, "le tamis d’Eratosthène". 


La vitesse de calcul comprend également Ile traitement des 
interrogations, des boucles et la gestion de champs de données. Ces 
tâches sont également prises en compte par la méthode que nous 
avons choisie et que nous avons appliquée à deux ordinateurs avec 
les résultats suivants : 


Apple II Europlus avec MBASIC 5.2 : 391,8 secondes 
VIC 20 avec carte 64K : 394,8 secondes 


Pour que vous puissiez vous même tester combien de temps il faut à 
votre CPC pour exécuter ce test, voici un listing du programme : 


10 REM Eratosthène 

20 DEFINT a-z 

30 DIM f1(1000):1=1000:PRINT"Début" 
40 FOR j=i TO 10 

50 co=0 

60 FOR i=1 TO I'fl(i)=1:NEXT i 
70 FOR i=1 TO 1 

80 IF fl(i)<>1 THEN 160 

90 prim=i+i+3 

100 k=i+prim 

110 IF k>1 THEN 150 
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120 fl(k)=0 

130 k=k+prim 

140 GOTO 110 

150 co=co+1 

160 NEXT i 

170 NEXT j 

180 PRINT co;"Nombres premiers" 
190 END 


Si vous lancez ce programme et mesurez le temps que met votre 
ordinateur, vous verrez qu’il soutient la comparaison avec les 
autres ordinateurs, y compris en ce qui concerne la vitesse de 
calcul. 


Un dernier conseil : votre CPC possède un bon nombre de signes 
mathématiques spéciaux que vous ne pouvez faire afficher qu'avec 
une instruction PRINT CHRS(X). Mais en réfléchissant un peu au 
problème vous devriez pouvoir trouver un moyen de faire jouer à ces 
signes leur rôle normal. Essayez par exemple avec la constante PI. 
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6.9 MOUVEMENTS DE L'ECRAN 


Plusieurs dialectes BASIC possèdent une instruction SCROLL 
permettant de faire glisser le contenu de l’écran d’une ligne vers 
le bas ou le haut. Nous avons utilisé une routine de la ROM du CPC 
pour simuler cette instruction. 


L’instruction SCROLL peut être très utile soit pour des jeux, soit 
pour faire défiler une liste. 


La méthode la plus simple pour provoquer un mouvement de l’écran 
consiste à ajouter un caractère dans l'angle inférieur droit, ce 
qui provoque un scrolling vertical vers le haut. Mais il est 
beaucoup plus compliqué d’arriver à un scrolling vertical vers le 
bas. On utilise généralement pour celà des routines en langage- 
machine assez longues. Sur le CPC cependant ïl est possible 
d'utiliser des routines de la ROM. 


La routine de mouvement de l’écran se trouve en &BC4D (voyez le 
chapitre 6.6). Elle déplace l’écran de 8 pixels (un caractère). La 
direction dépend de la valeur du registre b. Si celleci est nulle 
le déplacement se fait vers le bas et si celle-ci est non nulle le 
déplacement se fait vers le haut. 


Il y a deux façon d'appeler cette routine on peut écrire une 
routine d’appel en langage-machine dans laquelle on pokera en BASIC 
la valeur à affecter au registre b, ou on peut écrire dès le départ 
deux routines différentes, l’une pour un mouvement descendant, 
l’autre pour un mouvement ascendant. 


Pour plus de commodité, nous avons choisi cette dernière méthode. 
Voyons donc ce que devra faire notre routine en langage-machine: 


- tout d’abord charger une valeur donnée dans le registre b avec 
l'instruction Id b,N qui a le code 06. Le paramètre utilisé 
avec cette instruction sera O pour un mouvement descendant et 
255 pour un mouvement ascendant. C’est d’ailleurs la seule 
différence entre les deux routines. 
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- il faut ensuite appeler la routine de la ROM avec 
l'instruction CALL NN dont le code est 205. A la suite de 
l'instruction doit figurer l'adresse &BC4D divisée en octets 
faible et fort: 77 (4D) et 188 (BC). IL faut enfin retourner 
au BASIC avec un ret dont le code est 201. 


Voici les deux routines en langage-machine: 


Pour le mouvement ascendant: 


ld b,ff 06,255 
call &BC4D 205,77,188 
ret 201 


Pour le mouvement descendant: 


Id b,0 06,0 
call &BC4D 205,77,188 
ret 201 


Le programme BASIC de chargement de ces routines les place en 43880 
pour le mouvement ascendant et en 43886 pour le mouvement 
descendant. Ce programme une fois exécuté, vous pouvez l’effacer 
avec l’instruction DELETE -140 pour écrire ensuite votre propre 
programme qui utilisera ces routines. 


5 ha=40000 

10 REM ascendant 

20 MEMORY ha-i 

30 DATA 06,253,205,77,188,201 
40 FOR adr=ha TO ha+5 

50 READ valeur 

60 POKE adr ,valeur 

70 NEXT 

80 REM descendant 
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90 DATA 06,0,205,77,188,20i 
100 FOR adr=hn+é TO hn+ii 


110 READ valeur 


120 POKE adr ,valeur 


130 NEXT adr 
140 END 


Commentaire du listing : 


110 
120 
130 
140 


Ces routines 


titre 

réduire la mémoire BASIC 

DATAs pour la routine ascendante 

ouverture d’une boucle d’écriture de la routine en 
langage-machine 

lecture des valeurs 

écriture des valeurs dans les adresses correspondantes 
fermeture de la boucle 

titre 

DATAs pour la routine descendante 

ouverture d’une boucle d’écriture de la routine en 
langage-machine 

lecture des valeurs 

écriture des valeurs dans les adresses correspondantes 
fermeture de la boucle 

fin du programme 


une fois chargées, vous pourrez les appeler simplement 


avec call 43880 pour le mouvement ascendant et 43886 pour le 
mouvement descendant. 


Voici maintenant une démonstration des possibilités de scrolling 
que vous offrent ces deux routines: nous allons placer une 
inscription sur l’écran pour la faire ensuite monter puis descendre 
de 5 lignes grâce à nos deux routines. 


Vous pouvez 


contrôler la vitesse du mouvement en appuyant sur une 


touche. Si vous appuyez sur une touche, l’inscription se déplace. 
Sinon, le programme attend que vous appuyiez sur une touche. 
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10 REM scroll demo 

20 MODE I 

30 LOCATE 15,12:PRINT'SCROLLDEMO" 
35 REM ascendant 

40 FOR n=1l TO S 

50 IF INKEY$="" THEN 50 
60 CALL 40000 

70 NEXT n 

75 REM descendant 

80 FOR n=1 TO 5 

90 IF INKEYS$="" THEN 90 
100 CALL 40006 

110 NEXT n 

120 END 


Commentaire du listing: 


10 titre 

20 fixation du mode écran 

30 édition de l'inscription 

35 titre 

40 ouverture de la boucle pour compter les mouvements 
50 interrogation du clavier 

60 appel de la routine scroll (ascendante) 

70 fermeture de la boucle 

75 titre 

80 ouverture de la boucle pour compter les mouvements 
90 interrogation du clavier 

100 appel de la routine scroll (descendante) 

110 fermeture de la boucle 

120 fin du programme 


N'oubliez pas que ce programme de démonstration ne peut fonctionner 
si vous n’avez pas fait tourner au préalable le programme de 
création des routines de scrolling. 
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Pour faciliter l'appel de ces routines vous pouvez définir deux 
variables correspondant aux deux adresses: 


HAUT=40000  BAS=40006 


Il est intéressant de ne pas perdre de vue que l’accumulateur 
contient, pour ces deux routines, le code couleur de la ligne 
ajoutée en bas ou en haut de l'écran du fait du scrolling. Ceci 
vous permet de créer encore d’autres fonctions grâce à la routine 
scroll. 


Nous avons ainsi écrit un petit programme qui grâce à la routine 
scroll vous permet de modifier la direction, la longueur du 
mouvement ainsi que la couleur de la ligne nouvelle. 


Pour obtenir ces fonctions supplémentaires, il faut ajouter 
quelques instructions à notre routine en langage-machine. Le 
registre b sera toujours utilisé pour indiquer la direction du 
mouvement mais il fonctionnera en outre comme compteur du nombre de 
lignes à ajouter. Le registre a contiendra le code couleur de la 
ligne nouvelle. 


Comme le contenu des registres est détruit lors de l’appel d’une 
routine de la ROM, il nous faut placer le contenu de ces registres 
sur la pile où nous irons les rechercher après l'appel de la 
routine. Pour ce faire nous utiliserons les instructions PUSH 
(pousser) et POP (retirer). 
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Notre routine ainsi étendue devient donc: 


adresse instruction code explication 


43870 
43871 
43872 
43873 
43874 
43875 
43876 
43877 
43878 
43879 
43880 
43881 
43882 
43883 
43884 
43885 


L'instruction djnz,e est une instruction complexe de branchement 
conditionnel et relatif: elle signifie "décrementer, sauter de e si 
non nul. 


Le déroulement du programme exige en effet qu’il y ait un saut à 
l'adresse 40004, de façon à ce que le nombre de lignes ne soit pas 
limité à 1. Le registre b, comme nous l'avons déjà indiqué sert aux 
opérations de comptage. Ce registre doit donc être décrémenté de 1 
chaque fois que la routine est exécutée. C’est ce que fait notre 
nouvelle instruction. En outre, si le registre b n’est toujours pas 
nul après cette décrémentation, le programme saute à nouveau à 


Id b,N 

ld a,M 

push bc 
push af 

Id b,r 

call &BC4D 
pop af 

pop bc 


djnz,e 


ret 


l'adresse 40004. 


06 
N 
62 
M 
197 
245 
06 
R 
205 
77 
188 
241 
193 
16 
245 
201 


le nombre de lignes (N) est chargé 
dans le registre b 

le code couleur (M) est chargé 
dans l’accumulateur 

b est placé sur la pile 

a est placé sur la pile 

le code direction (R) est chargé 
dans le registre b 

appel de la routine de la ROM 
octet faible de l’adresse 

octet fort de l’adresse 

a est retiré de la pile 

b est retiré de la pile 

voir plus loin 


retour au BASIC 
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La valeur 245 qui sert de paramètre à notre nouvelle instruction 
indique au programme qu’il doit sauter de 9 octets en arrière. A 
ces 9 octets, deux sont ajoutés du fait que le compteur de 
programme est déjà dirigé sur l'instruction suivante. C'est ainsi 
que nous obtenons le nombre 11. Pour indiquer qu’il s’agit d’un 
saut en arrière, et non en avant, cette valeur doit être retranchée 
de 256 et on arrive alors à notre valeur de 245. 


Quand le registre b vaut 0, le programme retourne au BASIC. 


10 REM scrolldemo2 

15 hm=40000 

20 MEMORY ha-1 

30 adr=ha-1:scroll=ha 

40 DATA 6,10,62,0,197,245,6,255,205,77 
90 DATA 188,241,193,16,245,201 

60 FOR co=i TO 16 

70 READ valeur 

80 POKE adr+co, valeur 

90 NEXT co 

100 MODE i 

110 INPUT "couleur"; 

120 INPUT “nonbre de lignes"sn 

130 INPUT "Vers le haut (1) ou le bas (2) "sr 
140 IF r=1 THEN r=255 ELSE r=0 

150 POKE hm+3,m 

160 POKE hmti,n 

170 POKE he+7,r 

180 CALL scroll 

190 6OTO 100 
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Commentaire du listing: 


10 titre 

20 limitation de la mémoire BASIC 

30 fixation de l’adresse de début du programme 
40-50 Datas pour la routine en langage-machine 

60 ouverture de la boucle de lecture des DATA 
70 lecture des codes langage-machine 

80 écriture des valeurs dans les adresses correspondantes 
90 fermeture de la boucle 

100 fixation du mode écran 

110 entrée du code couleur 

120 entrée du nombre de lignes 

130 décision si mouvement ascendant ou descendant 
140 traitement de la dernière entrée 

150 écriture du code couleur 

160 écriture du nombre de lignes 

170 écriture de la direction du mouvement 

180 appel de la routine en langage-machine 

190 retour en 100 


Les entrées nécessaires dans ce programme doivent rester dans les 
limites suivantes: 


code couleur: entre 0 et 255 
nombre de lignes: entre 1 et 25 


Si vous voulez intégrer la routine en langage-machine dans un de 
vos programmes, vous aurez besoin des adresses suivantes: 


40003 le code couleur doit être placé dans cette adresse 

40001 le nombre de lignes doit être placé dans cette adresse 

40007 la direction du mouvement doit être placée dans cette 
adresse 

40000 adresse de départ de la routine en langage-machine 
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6.10 TRI DE DONNEES 


Le tri de données, qu’il s'agisse de données numériques ou de 
textes est une des tâches les plus classiques des programmeurs. Le 
critère de tri est naturellement la grandeur même des nombres 
lorsqu'il s’agit de données numériques et l’ordre alphabétique 
lorsqu'il s’agit de textes. Les codes des lettres de l’alphabet ont 
été choisis de façon à rendre très simple un tri par ordre 
alphabétique. Notez d’ailleurs que vous n’avez pas à vous en 
préoccuper car l'interpréteur BASIC vous permet de comparer 
directement deux chaînes de caractères entre elles d’après l’ordre 
alphabétique. 


Pour trier des données on peut faire appel à quantité d’algorithmes 
bien connus qui se différencient les uns des autres d’une part par 
leur complexité et d’autre part par leur efficacité. Pour choisir 
le bon algorithme pour une application donnée il convient tout 
d'abord de tenir compte du nombre de données qu’il s'agit de trier. 


Si vous n'avez en effet qu’une dizaine ou une cinquantaine de 
données à trier, les procédures les plus simples suffiront en 
général aisément à la tâche. Par contre si la masse de données 
excède une centaine ou un millier, les procédures les plus simples 
se révéleront le plus souvent impraticables car le temps de tri 
risque de dépasser plusieurs heures. Pour que vous puissiez 
apprécier la signification du choix d’un algorithme de tri, nous 
allons vous présenter deux méthodes de tri, l’une élémentaire et 
l'autre très rapide, bubble sort et quick sort. 


Avec bubble sort on compare deux éléments voisins qu’on échange si 
nécessaire. Cet algorithme peut être programmé en BASIC avec deux 
boucles imbriquées : 


100 FOR i=1 TO n:fl=0 

110 FOR j=n TOi step-1 

120 IF a$(j-1)>a$(j) THEN h$=a$(j):a$(j)=a$(j-1):a$(j-1)=h$:f1—1 
130 NEXT j:IF fl=0 THEN RETURN 

140 NEXT i:RETURN 
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Ce programme fonctionne comme un sous-programme que vous pouvez 
appeler avec GOSUB 100. La dimension du champ (l’index maximum) 
doit être transmise à la variable n, par exemple: 


10 n=50:DIM a$(n) 
20 ’lecture des données 
30 GOSUB 100 ‘tri de données 


Un tel programme de tri est parfaitement adapté à une situation où 
il n’y a que peu de données à trier ou bien où les données sont 
déjà prétriées et où seul un nouvel enregistrement doit être inséré 
dans les données triées. 


Voici maintenant un programme de tri connu sous le nom de quicksort 
qui convient au contraire au tri de masses importantes de données. 
Il s’agit ici aussi de trier d’après un champ alphanumérique dont 
l'index limite doit être placé dans la variable n. 


Ce programme génère comme démonstration le nombre que vous 
choisissez de mots aléatoires qu’il affiche, qu’il trie puis 
affiche dans l’ordre résultant du tri Le temps qui a été 
nécessaire pour effectuer le tri est affiché au même moment. 
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40 DEFINT b-z 

20 INPUT " Nombre de mots " ;n: DIM d$(n),0o(20),u(20) 

30 FOR i=1 TO n: b=5+10*RND 

40 FOR j=1 TO b: d$(i)=d$(i)+CHRS(RND*25+65):NEXT: NEXT 
50 GOSUB 80: a=TIME: GOSUB 100: a=(TIME-a)/300 


60 PRINT: GOSUB 80: PRINT: PRINT a "Sek.": END 
70 

80 FOR i=1 TO n: PRINT d$(i): NEXT: RETURN 

90 


100 s=1: o(1)=1: u(1)=n 

110 1=o(s): r=u(s): s=s-1 

120 1=1: j=r: h$=d#$((l+r)/2) 

130 WHILE daÿ(i)}(h$ AND ir: i=i+1: WEND 
140 WHILE d$(j)>h$ AND j>1: j=3-1: WEND 
150 IF it=) THEN d$=d$(i):d4$(i)=d$(j):d4$(j)-d$:i=i+1:j=j-1 
160 IF i(=) THEN 130 

170 IF r-it=3j-1l THEN 200 

180 IF 1j THEN s=s+1: o(s)=1: u(s)=) 
190 1=i: GOTO 220 

200 IF ir THEN s=s+1: o(s)=i: u(s)=r 
210 r=) 

220 IF r>1 THEN 120 

230 IF s)0 THEN 110 

240 RETURN 
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Si vous faites tourner le programme avec des champs de différentes 
tailles, vous obtiendrez environ les résultats suivants: 


n sec. 
50 3.8 
100 7,9 
200 18.6 
500 110 


Le fait que le temps de tri pour 500 enregistrements soit 
proportionnellement beaucoup plus long que pour les masses de 
données plus réduites tient à un autre phénomène, la garbage 
collection. 


Ce phénomène devient inévitable lorsque vous travaillez avec un 
grand nombre de chaînes de caractères. Si vous venez juste 
d’exécuter le programme avec 500 chaînes de caractères et que vous 
essayez d'entrer: 


? FRE("") 


vous devrez attendre environ 29 secondes avant que l'ordinateur ne 
vous réponde. C’est le temps qu’il faut à l’interpréteur BASIC pour 
ranger sa mémoire de chaînes de caractères. Chaque fois que le 
contenu d’une chaîne de caractères est modifié, l’interpréteur 
écrit le nouveau contenu dans la mémoire disponible et laisse 
intact l’ancien contenu. 


Mais lorsque toute la mémoire disponible pour les chaînes de 
caractères est occupée entièrement, l’ordinateur examine toutes les 
chaînes et supprime celles qui sont périmées de façon à libérer à 
nouveau de la place pour les nouvelles chaînes à créer. Plus il y a 
de chaînes valables en mémoire, plus cette procédure prend de 
temps. S'il y a 500 chaînes on arrive justement à 29 secondes. 
Cette procédure de garbage collection doit être utilisée 
constamment par l’interpréteur lors d’une opération de tri puisque 
le tri a pour effet de copier en permanence des chaînes de 
caractères. 
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Voici maintenant à titre de comparaison les temps de tri avec la 
méthode bubble sort: 


n sec. 
50 12.1 
100 49 
200 2382 
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6.11 TRANSMISSION DE DONNEES 
A D'AUTRES ORDINATEURS 


La transmission de données du CPC à d’autres ordinateurs par 
l'intermédiaire des cassettes ou des disquettes n'est en général 
pas possible du fait de la différence entre les formats de stockage 
des divers ordinateurs. Par contre, la transmission directe de 
données du CPC à un autre ordinateur peut fonctionner si 
l'ordinateur récepteur possède un port parallèle pouvant recevoir 
des données comme c’est le cas par exemple de tous les ordinateurs 
COMMODORE. 


Le CPC possède également un port parallèle qui ne peut toutefois 
servir qu’à l’envoi et non à la réception de données. Il s’agit du 
port imprimante auquel peut être connecté une imprimante 
Centronics. La procédure de transmission à travers un tel port est 
extrèmement simple et ne nécessite du côté de l'ordinateur 
récepteur qu’un programme assez élémentaire. Matériellement la 
connexion nécessite un câble reliant le port imprimante de votre 
CPC par exemple au port utilisateur d’un COMMODORE. Comme 
l'imprimante est connue du CPC, il suffit d’appeler ce port à 
travers le canal 8 qui est affecté par le CPC à l’imprimante. Cette 
méthode vous permet par exemple de transmettre les listings 
imprimés dans le présent ouvrage à un programme de traitement de 
texte tournant sur un COMMODORE. Seule la réception des données 
nécessite une petite routine en langage-machine telle que celle que 
nous vous fournissons ici pour un COMMODORE 64. Cette routine 
reçoit les données venant du CPC, les convertit en code COMMODORE 
et les écrit sur un fichier séquentiel sur cassette ou sur 
disquette, ou simplement à l’écran. Une fois que vous avez appelé 
cette routine sur un COMMODORE 64, vous pouvez transmettre un 
programme de votre CPC au COMMODORE 64 simplement avec 
l'instruction: 


LIST #8 
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vous pouvez également transmettre tout autre texte ou caractère 
avec l'instruction PRINT #8 : 


PRINT #8, "Des nouvelles du CPC" 


Le routine en langage-machine sur le COMMODORE 64 est conçue de 
façon à ce que vous puissiez mettre fin à la transmission en 
envoyant un code CHRS$(0). 


Il est toutefois important de noter que le port Centronics du CPC 
ne travaille qu’avec 7 bits alors qu’un port Centronics dispose 
normalement de 8 bits. Le bit supérieur est en effet toujours 
branché sur la masse. Ceci ne peut vous poser de problèmes pour 
transmettre des textes ASCII puisque le code ASCII est un code 7 
bits. Par contre si vous voulez réaliser un hardcopy graphique de 
l'écran sur une imprimante, vous risquez de rencontrer certaines 
difficultés car la plupart des imprimantes graphiques emploient 8 
aiguilles. 


Voici maintenant le programme en langage-machine pour le 
COMMODORE 64 : 


30: DDO00 CIA = $DD00 

40: DDO0 PORTA = CIA ; port pour ‘occupé’ 
50: DDO01 PORTB = CIA+1 ; port pour données 
60: DDOD CR = CIA+ 13 registre de contrôle 
70: ; 

80: Co00 *=  $C000 

90: C000 AD 00 DD START LDA PORTA 

100: C003 29 FB AND #%11111011 ;busy low 

110: C005 8D 00 DD STA PORTA 

120: CO008 A9 10 LDA #%100000 

130: CO0A 2C OD DD WAIT BIT CR 

140: CO0D FO FB BEQ WAIT attendre flag 

150: CO0F AD 00 DD LDA PORTA 

160: C012 09 04 ORA #%100 ;busy hi 

170:  C014 8D 00 DD STA PORTA 

180: C017 AD 01 DD LDA PORTB lire données 


190: CO1A FO 2A BEQ ENDE ;si O, fin 


200: C01C C9 OA CMP #10 ignorer line feed 

210: CO1E FO EO BEQ START 

220: C020 C9 41 CMP #"A" 

230: C022 90 12 BCC END sconversion en 

240: C024 C9 5B CMP #"Z"+1 

250: C026 BO 04 BCS TEST ;ASCII CBM 

260: CO28 09 80 ORA #$80 

270: CO02A 30 OA BMI END 

280: Co2C C9 61 TEST CMP #5$61 

290: CO2E 90 06 BCC END 

300: C030 C9 7B CMP +#$7B 

310: (C032 BO 02 BCS END 

320: (C034 29 5F AND #$5F 

330: C036 48 END PHA ;ranger les données 

340: C037 A2 O1 LDX #1 

350: C039 20 C9 FF JSR $FFC9  jédition sur le canal 1 

360: C03C 68 PLA 

370: C03D 20 D2 FF JSR $FFD2  ;sortir un caractère 

380: (C040 20 CC FF JSR $FFCC  ;sortie à nouveau sur 
défaut 

390: C043 4C 00 CO JMP START jretour au début 

400: CO046 60 ENDE RTS fin 


Sur le COMMODORE 64, vous devez ouvrir tout d’abord un canal de 
données avec le numéro logique 1 : 


OPEN 1,1,1,'DONNEES" pour la cassette ou 
OPEN 1,8,2,DONNEES,S,W" pour la disquette ou 
OPEN 1,3 


si vous voulez simplement une édition sur l'écran. Vous pouvez 
ensuite lancer le programme avec SYS 49152. Vous pouvez alors 
envoyer par exemple un listing de programme du CPC au 
COMMODORE avec l'instruction LIST #8. Vous pouvez mettre fin 
à la transmission en entrant sur votre CPC : 
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PRINT #8, CHRS(0) 


Le COMMODCORE 64 affiche alors READY” et vous pouvez fermer le 
fichier sur lequel ont été écrites les données avec l'instruction 
CLOSE I. Voici enfin l'affectation des pins du câble de 
transmission entre les deux ordinateurs: 


Port imprimante Port utilisateur 
du CPC du COMMODORE 64 
Pin Signification Pin 

1 flag B 

2 DO C 

3 D] D 

4 D2 E 

5 D3 F 

6 D4 H 

7 DS J 

8 D6 K 

9 D7 L 

11 BUSY M 

12 GND N 
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6.12 IMPRESSION TRANSPARENTE 


Vous avez certainement remarqué que l’impression est beaucoup plus 
lente que l’édition sur écran. Lorsque vous utilisez un programme 
qui imprime certaines données au fur et à mesure que vous les 
entrez, l'impression risque de ralentir considérablement votre 
travail. La solution idéale est bien sûr l’impression transparente 
qui vous permet de continuer à utiliser votre ordinateur pendant 
que l’impression se déroule. 


Nous vous avons concocté une petite routine d’impression 
transparente très simple à utiliser: ajoutez à votre programme les 
lignes de cette routine (65000 à 65240) et vous n’aurez ensuite 
plus qu’à affecter à la variable pr$ les données à imprimer et à 
appeler la routine avec GOSUB 65000 pour déclencher l'impression 
transparente. 


Le buffer d'imprimante sera alors rempli avec pr$ et votre 
programme continuera sauf si le buffer est plein. 


C'est pourquoi vous pouvez adapter sa dimension à vos besoins grâce 
à l'instruction EVERY qui contraint l'ordinateur à examiner 
régulièrement s’il y a quelque chose dans le buffer. Si oui, une 
ligne est éditée, etc. 


Attention! La fin de votre programme doit absolument se présenter 
comme les lignes 220 et 240 de façon à ce que le contenu du buffer 
soit bien entièrement imprimé! 


Les lignes 100 à 200 servent de démonstration. La routine que vous 


pourrez intégrer dans vos programmes commence en 65000. Pour une 
utlisation en grandeur réelle, changez le 7 de la ligne 65200 en 8. 
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Voici le programme: 


100 CLS:WINDOW #7,21,40,1,25 

140 FOR i=0 TO 130 

160 pr$=HEX$(i,6) 

180 GOSUB 65000 

200 NEXT 

210 PRINT” “ 

220 ON bfl GOTO 220 

240 END 

65000 REM fill buffer 

65020 ON f1 GOTO 65060 

65040 DIM pr$(999):fl1l=1:pfc=1 
65050 EVERY 30,0 GOSUB 65160 
65060 IF pc=pfc THEN 65060 

65080 DJ:pr$(fc)=pr$:bfi=1 

65100 fc=fc+1:1IF fc)999 THEN fc=0 
65120 pfc=fc+1:1F pfc)>999 THEN pfc=0 
65140 RETURN 

65160 REM print buffer 

65180 IF pc=fc THEN bf1=0:RETURN 
65200 PRINT#7,pr#$(pc) 

65220 pc=pc+1:I1F pc)999 THEN pc=0 
65240 RETURN 


175 


CHAPITRE 7 PROGRAMMES UTILISATEUR 


7.1 INTRODUCTION 


Comme il n’y a pas encore beaucoup de programmes pour le CPC sur le 
marché et que seuls les programmes font véritablement d’un 
ordinateur une machine très utile, nous vous présentons quelques 
applications pratiques qui pourront vous rendre de grands services, 
à commencer par un programme de gestion de données puisque c’est là 
certainement une des applications les plus courantes et les plus 
importantes pour tout un chacun des ordinateurs. 


Le CPC se prête d’ailleurs admirablement bien à la gestion de 
données, notamment grâce à ses 80 caractères par ligne. 


Les programmes que nous vous présentons peuvent tous tourner tels 
quels mais nous les avons abondamment commentés et nous vous 
indiquons pour chaque partie de ces programmes comment vous 
pourriez Y apporter des modifications éventuelles pour les 
améliorer ou les adapter à vos besoins propres. L'analyse détaillée 
de tels programmes ainsi que leur adaptation seront pour vous une 
excellente manière d'apprendre à maîtriser pleinement le BASIC. 


Nous vous souhaitons beaucoup de réussite: c’est en forgeant qu’on 
devient forgeron! 
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72 PROGRAMME DE TRAITEMENT DE DONNEES 


Une gestion de données est un programme universel que vous pouvez 
adapter à différentes applications particulières, alors qu’un 
programme de gestion d’adresses ou de gestion de stock constitue 
une application spécifique. 


La gestion de données est réalisée en informatique grâce à un 
programme de gestion de fichier qui comporte des enregistrements et 
des champs. Pour bien comprendre le lien entre la gestion de 
fichier et un traitement de données manuel classique, il suffit de 
comparer le fichier informatique au fichier classique, les 
enregistrements étant les diverses fiches en carton dont se compose 
le fichier classique et le champ correspondant à chaque rubrique 
d’une de ces fiches en carton. 


Le caractère universel d’un programme de gestion de fichier se 
manifeste par le fait que vous pouvez déterminer librement le 
nombre d’enregistrements et de champs. Vous pouvez affecter à 
chaque champ le nom que vous souhaitez. Si vous voulez créer un 
fichier d’adresse avec votre programme de gestion de fichier, vous 
pouvez par exemple définir le premier champ 'NOM/PRENOM, le 
second ‘RUE’ et le troisième *LOCALITE’. Vous voyez qu’un 
tel programme peut vraiment rendre service à tout le monde du 
fait de son adaptabilité Vous pouvez même avec un peu 
d'imagination l'utiliser pour le traitement de texte. 


Comme ce programme est relativement long nous l’avons décomposé 
pour l’exposé en ces différents modules. Mais bien sûr vous devrez 
taper directement tout le programme sur votre CPC. 


MODULE 1 -MENU- 


Le menu vous présente les différentes fonctions dont dispose le 
programme en associant un numéro à chacune de ces fonctions. Pour 
sélectionner une fonction, vous tapez le numéro correspondant puis 
vous appuyez sur ENTER. Chaque fois que vous avez fini d'utiliser 
une fonction quelconque du programme vous êtes à nouveau ramené 
au menu. 
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Vous pouvez alors indiquer à l'ordinateur d’exécuter une autre 
tâche. 


10 REMISE EEEEHE 
POSTES ES 

20 REMAIHHHHHNNNEEENNNENMONNNEE C 0 PV OÙ GA À RHONE 
PRCTEDETE LS 

30 REMHERHENNNNNNENNENNE À e à nm CPC 4 6 À HHHREEEHNNNE 
CETIETTES ES 

40 REMRNENMNNENENNENON d a À a bDecker HHHHHHRHHHEREER 
HHHHENE 

50 REMAHHHEEEENNNENENNEE 1984 PDÉTEDETECIS LIL 
HAE 

60 REMAHHIIERIEAENEIEAEEEEEEEEEEEEEEEEEEEE 
PTIT TI TI LS 

70 REM Gestion de fichier version 1.0 (6.6) 

80 REMAAIEEEEEEEEEEEEEEEEEE EEE EEEEEE 
CETTÉTET CE 

90 MODE 2 

100 LOCATE 20,3:PRINT'C PC D A T A" 

110 LOCATE 20,5:PRINT STRING$ (424, "=") 

120 LOCATE 12,7:PRINT"COPYRIGHT 1984 BY DATA BECKER" 
130 LOCATE 13,10:PRINT" MENU" 

140 LOCATE 15,142 PRINT" ------- " 

130 LOCATE 15,13:PRINT"Creer un fichier - 
160 LOCATE 15,14:PRINT'Entrer le fichier - 2 
170 LOCATE 15,15:PRINT"Actualiser le fichier -3 
180 LOCATE 15,16:PRINT"Sauvegarder le fichier - 4 -" 
190 LOCATE 15,17: PRINT"Charger un fichier 5 
200 LOCATE 15,18: PRINT"Recherche - 6 


210 LOCATE 15,19:PRINT" Imprimer le fichier pol 
220 LOCATE 15,20:PRINT'Fin du programme -8- 
230 LOCATE 15,21:PRINT"Supprimer le fichier -9-" 


240 PRINT:PRINT: INPUT“ Votre choix (1-9) JENTERC"; a 
250 ON a GOSUB 280,630,1010,1440,1570,1700,1900, 2020, 2070 
260 6070 90 
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Explication du programme: 


10-80 Indication du copyright ainsi que du numéro de la 
version du programme 


90 Passage en mode 80 caractères 

100-230 Edition de la page menu avec l'instruction locate 

240 On vous demande de choisir une des fonctions du 
programme 

250 Saut à la routine que vous avez choisie 

260 Lorsqu’un des modules du programme a été exécuté, le 


programme retourne à cette ligne par une instruction 
RETURN. Cette ligne indique à l’ordinateur de sauter 
au début du module menu. 

Variables employées: 

a Numéro du module du programme sélectionné 


Mode d’emploi de ce module: 


Entrez le numéro du module sélectionné et appuyez sur ENTER. 


MODULE 2 -CREATION DU FICHIER- 


Ce module vous permet de définir le fichier à créer. Vous devez 
fournir deux indications: la dimension que doit avoir votre fichier 
et d’autre part quels noms devront avoir les différents champs de 
votre fichier. Une fois que vous avez entré ces indications, vous 
avez encore la possibilité de les modifier immédiatement si vous 
pensez avoir Commis une erreur. 
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280 REM creation du fichier 

290 CLS 

300 PRINT STRING$ (450, "-") 

310 LOCATE 15,3:PRINT'CREATION DU FICHIER" 

320 PRINT STRINGS$ (&30,"-") 

330 LOCATE 1,8: INPUT"Conbien d'enregistrements doit comporter le fichi 
er"senregis 

340 PRINT: INPUT"Combien de champs doit coaporter un enregistrement ";ch 
anps 

350 DIM nomenr$ (enregis) 

360 DIM nomcha$ (champs) 

365 DIM contenu$ (champs ,enregis) 

370 REM definition des champs 

380 CLS 

390 PRINT'Definition des champs d'un enregistrement" 

400 henregis=enregis 

410 hchamps=champs 


430 PRINT:PRINT" (Vous avez “schamps; "champs a definir)" 

440 PRINT:PRINT 

450 FOR champs=i TO hchanps 

460 PRINT'Non du champ No “schaaps: INPUT""snomcha$ (champs) 

470 NEXT champs 

480 PRINT: INPUT" Voulez-vous apporter des modifications"; nodit$ 
490 IF LEFT#(modif$,1)="n" THEN GOTO 90 

500 CLS 

510 PRINT'Modification du nom d'un champ" 

520 PRINT"------————emnnnnnnenenmnne À 

530 FOR champs=i TO champs -i 

540 PRINT"Nom": chaapss "1" ,nomcha$ (champs) 

990 NEXT 

560 PRINT: PRINT 

570 INPUT"Quel champ voulez-vous aodifier";champs 

580 PRINT'Ancien nom du champ "nomcha$ (champs) 

590 INPUT"Nouveau nom du champ “ynomcha$ (champs) 

600 INPUT'Voulez-vous apporter encore une modification"s;madif$ 
610 IF LEFT$(modif$,1)="n" THEN GOTO 90 ELSE GOTO 540 

b20 RETURN 
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Explication du programme: 


280-320 
330-340 


350-360 


400-410 


380-440 
450-470 
480 

490 

500-520 
530-550 
560-620 


En-tête du module 
Entrée de la taille du fichier 


Les variables réservées pour les différents noms des 
champs du fichier sont dimensionnées en fonction de la 
dimension choisie du fichier 


Les nombres de champs et d’enregistrements sont placés 
dans des variables auxiliaires (hchamps et henregis) 
car les variables champs et enregis seront utilisées 
dans des boucles où elles pourront recevoir d’autres 
valeurs 


En-tête du sous-module DEFINITION DES CHAMPS 
Boucle d’entrée des noms de champs 

Demande si modifications nécessaires 

Si "non", retour au menu 

En-tête du sous-module MODIFICATION 

Boucle d’édition des noms de champs 

Routine de modification des noms avec retour au menu 
quand plus aucune modification n’est demandée 


Variables employées: 


enregis Nombre d’enregistrements du fichier 
champs Nombre de champs du fichier 
henregis Conserve le nombre d’enregistrements 
hchamps Conserve le nombre de champs 
nomenr$(enregis) Noms des enregistrements 
nomcha$(champs) Noms des champs 

modif$ Contient la décision oui/non 
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Améliorations possibles: 





La définition du fichier sous sa forme actuelle interdit une 
extension future de ce fichier. Il y a donc là une modification 
majeure à réaliser qui remettrait en cause beaucoup de principes 
utilisés dans notre programme. Il est donc recommandé aux débutants 
qui voudraient s'attaquer à ce problème de se faire aider par des 
programmeurs plus confirmés. Les débutants pourraient par contre 
essayer d'écrire quelques lignes de programme pour contrôler les 
entrées et rejeter les entrées erronnées ou bien essayer d’utiliser 
les fenêtres lors de la procédure d’entrée. On pourrait ainsi 
contrôler la sortie du cadre d’une zone donnée de l’écran et 
améliorer l'ergonomie du programme. 


Mode d'emploi de ce module: 


Le mode d'emploi est très simple puisque vous n’avez qu’à répondre 
aux demandes qui vous sont faites par l'ordinateur: vous entrez 
d’abord le nombre d’enregistrements (par exemple pour un fichier 
d'adresses, combien de personnes figureront dans votre fichier) 
puis le nombre de champs (combien de renseignements voulez-vous 
pouvoir porter par personne). Vous indiquez ensuite les noms des 
différents champs. 


Vous pouvez ensuite choisir de retourner au menu (entrez n) ou 
d'effectuer des modifications (entrez o). Le programme affiche 
alors les différents champs ainsi que leurs noms respectifs et vous 
entrez alors le numéro du champ que vous souhaitez modifier. Vous 
choisissez maintenant à nouveau, soit de procéder à une autre 
modification, soit de retourner au menu. 


MODULE 3 -ENTRER LE FICHIER- 


Ce module vous permet de remplir le fichier que vous avez défini. 
On vous demande d’abord de donner un nom au fichier et vous pouvez 
ensuite entrer toutes les données (noms, adresses, etc.) que vous 
voulez y voir figurer. 
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Après chaque entrée, vous pouvez éventuellement corriger ce que 
vous venez d'inscrire. 


630 CLS 

640 champs=hchamps 

650 enregis=henregis 

660 PRINT STRING$ (450, "-") 

670 LOCATE 15,S:PRINT'ENTRER LE FICHIER" 

680 PRINT STRING$ (850, "-") 

690 LOCATE 1,10:PRINT" (Votre fichier a"senregis; "enregistrements et"sc 
haaps; “champs)" 

700 PRINT:PRINT: INPUT" Quel doit etre le nom du fichier "snonfich$ 
710 CLS 

720 REM voir ligne 365 

730 FOR enregis=1 TO henregis 

740 champs=hchamps 

750 FOR chaaps=i TO hchamps 

760 WINDOW SHAP 0 

770 WINDOW 1,80,1,8 

780 PRINT STRINGS (450 ,"-") 

790 PRINT'Noa du fichier :"snomfich$ 

800 PRINT"Maximum d'enregistrements :"henregis, “Nombre de champs :"jh 
hamps 

810 PRINT"Nunero de l'enregistrement actuel :"senregis 

820 PRINT'Nurero du champ actuel :“schaaps 

830 PRINT STRINGS (850 ,"-") 

840 WINDOW 1,80,9,25 

850 CLS 

860 PRINT noncha$ (champs) ; : INPUT"; contenu$ (champs ,enregis) 
870 NEXT chaaps 

880 NEXT enregis 

890 LOCATE i,10 

900 PRINT: INPUT"Voulez-vous apporter des aodifications";aodiff 
910 IF LEFT$(modif$,1}="n" THEN GOTO 90 

920 CLS 

930 PRINT'Modification du contenu d'un RNA” 


950 PRINT: INPUT"Quel champ voulez-vous nodifier"s;champs 

960 INPUT'Dans quel enregistrenent";enregis 

970 PRINT'Ancien contenu du champ "contenu$ (champs ,enregis) 
980 INPUT"Nouveau contenu du chaap "scontenu$ (champs, enregis) 
990 INPUT"Voulez-vous apporter encore une modification"s;aodif$ 
1000 IF LEFT$(modif#,1)="n" THEN GOTO 90 ELSE GOTO 920 
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Explication du programme: 


630-690 En-tête du module 
650-660 Les variables enregis et champs reçoivent leurs 


valeurs originelles 


700 Entrée du nom du fichier 

720 La variable contenu$ qui contiendra les données est 
dimensionnée 

730-750 Ouverture des boucles d’entrée des données 

770-830 En-tête du sous-module d’entrée qui vous informe sur 


les champs et enregistrements (technique des fenêtres) 
840-880 Lecture des données de votre fichier 
890-910 Demande si modifications nécessaires 

Si "non", retour au menu 
920-1000 Routine de modification avec retour au menu quand plus 


aucune modification n’est demandée 


Variables employées: 


enregis Nombre d’enregistrements du fichier 

champs Nombre de champs du fichier 

henregis Conserve le nombre d’enregistrements 

hchamps Conserve le nombre de champs 

nomfich$ Nom du fichier 

contenu$(champs,enregis) Tableau à deux dimensions 
contenant les données du fichier 

modifs Contient la décision oui/non 
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Améliorations possibles: 





Deux améliorations principales sont possibles qui sont à la portée 
de tous: 


Premièrement éviter que lors de l’entrée d’un enregistrement, tous 
les champs définis auparavant soient effacés. 


Deuxièmement appeler la routine de modifications après l’entrée de 
chaque enregistrement. 


Notez d’autre part l’emploi des fenêtres, une méthode qui rend un 
programme beaucoup plus agréable à utiliser et que vous pouvez 
étendre à toutes les parties de notre programme mais bien sûr 
également à tout autre programme. 


Mode d'emploi de ce module: 


Vous entrez d’abord le nom du fichier puis vous passez dans la page 
d'entrée où vous voyez en permanence le nombre maximum 
d’enregistrements et de champs ainsi que les numéros des champ et 
enregistrement actuels. Dans la partie médiane de l'écran, vous 
entrez les données de votre fichier champ par champ. 


Vous pouvez ensuite procéder à des modifications comme dans le 
module précédent ou bien retourner au menu. 


MODULE 4 -ACTUALISER LE FICHIER- 


Ce module vous permet de maintenir votre fichier "dans le coup". Il 
arrive souvent qu’on ait besoin de modifier des données d’un 
fichier, à la suite d’un changement d’adresse par exemple ou bien 
parce qu’on à rencontré certaines personnes et qu’on en a perdu 
d’autres de vue. C’est ce que permet donc le module 4, module 
d’actualisation de votre fichier. 
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Vous pouvez modifier les données que contient votre fichier soit en 
indiquant directement le champ et l’enregistrement que vous voulez 
modifier, soit en feuilletant votre fichier jusqu’à ce que vous 
rencontriez un enregistrement qu’il vous semble nécessaire de 
modifier. 


1010 CLS 

1020 PRINT STRINGS (&50,"-") 

1030 LOCATE 15,3:PRINT" ACTUALISER LE FICHI 
E R' 

1040 PRINT STRING$ (K50,"-") 

1050 PRINT:PRINT'Modification directe du contenu d'un champ  - 1 -" 
1060 PRINT'Feuilleter puis modifier #2" 

1070 PRINT: INPUT "Votre choix "ya 

1080 IF a=2 GOTO 1170 

1090 CLS 

1100 PRINT'Modification directe du contenu d'un champ" 

1110 PRINT:PRINT:PRINT: INPUT "Quel champ voulez-vous nodifier";champs 
1120 INPUT"Dans quel enregistrement ";enregis 

1130 PRINT:PRINT:PRINT"Ancien contenu du champ "contenu$ (champs ,enregi 

6) 

1140 INPUT'Nouveau contenu du champ ";contenu$ (champs ,enregis) 

1150 INPUT"Voulez-vous apporter encore une modification";modif$ 

1160 IF LEFT$(nodif#,1)="0" THEN GOTO 1090 ELSE RETURN 

1170 CLS 

1180 champs=hchamps 

1190 enregis=henregis 

1200 FOR enregis=i TO henregis 

1210 WINDOW 1,80,1,8 

1220 PRINT STRING$ (450, "-") 

1230 PRINT'Fichier actuel :"nomfich$ 

1240 PRINT'Enregistrement actuel :"enregis 

1250 PRINT STRINGS (&50,"-") 

1260 GOSUB 1290 

1270 PRINT: INPUT "Voulez-vous apporter des modifications";modif$ 


186 


1275 IF LEFT$(nodif$,1)="n" THEN GOTO 1420 

1280 GOTO 1350 

1290 WINDOW 1,80,9,20 

1300 CLS 

1310 FOR champs=i TO hchamps 

1320 PRINT nomcha$ (champs) ss "scontenu$ (champs ,enregis) 

1330 NEXT champs 

1340 RETURN 

1350 WINDOW 1,80,21,25 

1360 CLS 

1370 PRINT STRINGS (450,"-") 

1380 PRINT: INPUT"Quel champ voulez-vous modifier";chanps 

1390 INPUT'Nouveau contenu du champ "scontenu$ (champs ,enregis) 
1400 INPUT"Voulez-vous apporter encore une modification"; naodif$ 
1410 IF LEFT$(modif$,1)="o" THEN GOTO 1360 

1420 NEXT enregis 

1430 RETURN 
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Explication du programme: 





1010-1060 En-tête du module 

1070 Choix du sous-module 

1080 Saut au sous-module choisi 

1090-1140 Modification directe après indication du champ et de 
l’enregistrement à modifier 


1150-1160 Vous indiquez si vous voulez apporter encore une 
modification ou revenir au menu 


1170-1250 En-tête de l’autre sous-module 

1200 Boucle d’affichage des enregistrements 

1260 Saut à la routine d’affichage des champs 

1290-1330  Routine qui affiche par une boucle le nom et le 
contenu de chaque champ d’un enregistrement 


1340 Retour en 1270 
1270 Décision si modification ou saut en 1350 
1350-1400 Routine de modification 


1400-1410 Décision si un autre champ doit être modifié. Si 
"non", enregistrement suivant 


Variables employées: 


a Numéro du sous-module à appeler 

enregis Nombre d’enregistrements du fichier 

champs Nombre de champs du fichier 

henregis Conserve le nombre d’enregistrements 

hchamps Conserve le nombre de champs 

nomfich$ Nom du fichier 

contenu$(champs,enregis) Tableau à deux dimensions 
contenant les données du fichier 

modif$ Contient la décision oui/non 
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Améliorations possibles : 


C’est uniquement le deuxième module qu’il serait nécessaire 
d'améliorer : vous ne pouvez en effet retourner au menu que lorsque 
vous avez feuilleté l’ensemble des enregistrements, ce qui peut 
être extrèmement pénible si le fichier est de taille importante. Il 
faudrait donc écrire une petite routine qui teste en permanence si 
une touche (par exemple ’&’) est enfoncée et dans ce cas vous 
renvoie au menu avec une simple instruction GOTO. 


Mode d’emploi de ce module : 


Vous devez d’abord décider si vous voulez faire une modification 
directe ou feuilleter d’abord les divers enregistrements de votre 
fichier. Vous ne pouvez évidemment faire de modification directe 
que si vous connaissez les numéros du champ et de l’enregistrement 
à modifier. Dans le cas contraire, vous devez choisir le deuxième 
sous-module. 


Si vous choisissez la modification directe, vous entrez les numéros 
du champ et de l’enregistrement à modifier. Le programme affiche 
alors l’ancien contenu de ce champ que vous pouvez maintenant 
modifier. Vous indiquez ensuite si vous voulez procéder à une autre 
modification ou revenir au menu. 


Si vous choisissez de feuilleter le contenu du fichier, le 
programme affiche le contenu des divers champs de chaque 
enregistrement l’un après l’autre. Vous pouvez alors modifier un 
champ en en indiquant le numéro. Vous pouvez ensuite modifier un 
autre champ ou consulter l'enregistrement suivant. 


MODULE 5 -SAUVEGARDER LE FICHIER- 


Ce module vous permet de sauvegarder votre fichier sur cassette ou 
disquette, de façon à ce que vos données soient conservées une fois 
que vous aurez éteint votre ordinateur. 
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1440 CLS 

1450 PRINT STRINGS (450, "-") 

1460 PRINT" SAUVEGARDER LE FICHI 
E R' 

1470 PRINT STRING (850, "-") 

1480 LOCATE 5,10:PRINT"Je sauvegarde votre fichier, veuillez patienter 


1490 OPENOUT nomfich$ 

1500 FOR enregis=1 TO henregis 

1510 FOR champs=1 TO hchamps 

1520 PRINT#9,contenu$ (champs ,enregis) 
1530 NEXT champs 

1540 NEXT enregis 

1530 CLOSEOUT 

1560 RETURN 
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Explication du programme : 


1440-1470 En-tête du module 

1480 Message à l’utilisateur 

1490 Ouverture d’un fichier sur cassette ou sur disquette 
avec le nom du fichier se trouvant en mémoire 

1500-1540 Boucle d'écriture des données sur la bande 

1550 Fermeture du fichier 

1560 Retour au menu 


Variables employées : 


enregis Nombre d’enregistrements du fichier 

champs Nombre de champs du fichier 

henregis Conserve le nombre d’enregistrements 

hchamps Conserve le nombre de champs 

nomfich$ Nom du fichier 

contenu$(champs,enregis) Tableau à deux dimensions 


contenant les données du fichier 


Améliorations possibles : 


Il n'y a pas ici d'améliorations essentielles à apporter. Vous 
pouvez toutefois améliorer la présentation et l'ergonomie de ce 
module. 


Mode d’emploi de ce module : 


Si vous possédez un lecteur de disquette (CPC 664, 6128 ou 464 + 
DD1), la sauvegarde se fera immédiatement. Sinon, le message vous 
invitant à appuyer sur les touches PLAY et RECORD du lecteur de 
cassette apparaîtra peu après la sélection de ce module. Vous 
n’avez plus ensuite qu’à appuyer sur une touche quelconque pour 
que la sauvegarde s'effectue. 
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MODULE 6 -CHARGER UN FICHIER- 


Ce module vous permet de charger les fichiers que vous avez 
sauvegardés sur cassette ou disquette. Mais vous devez auparavant 
fixer les paramètres de nombres de champs et d’enregistrements en 
fonction du fichier que vous allez charger. Utilisez pour celà le 
module 1. 
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1570 CLS 

1580 PRINT STRINGS (&50,"-") 

1590 PRINT“ CHARGER UN FICHIE 
R' 

1600 PRINT STRINGS$ (850, "-") 

1605 PRINT:PRINT: INPUT "Entrez Le nom du fichier "ynomfich$ 

1810 LOCATE 5,10:PRINT"Je charge votre fichier, veuillez patienter." 
1620 OPENIN nomfich$ 

1630 FOR enregis=1 TO henregis 

1640 FOR champs=i TQ hchamps 

1850 INPUTH9,cantenu$ (champs ,enregis) 

1660 NEXT champs 

1670 NEXT enregis 

1680 CLOSEIN 

1690 RETURN 


Explication du programme : 
1570-1600 En-tête du module 


1610 Message à l’utilisateur 

1620 Ouverture d’un fichier sur cassette ou disquette en 
lecture 

1630-1670 Boucle de lecture des données sur la bande 

1680 Fermeture du fichier 

1690 Retour au menu 


Variables employées : 


enregis Nombre d’enregistrements du fichier 
champs Nombre de champs du fichier 
henregis Conserve le nombre d’enregistrements 
hchamps Conserve le nombre de champs 


contenu$(champs,enregis) 
Tableau à deux dimensions contenant les données du 
fichier 
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Améliorations possibles : 


Ici aussi, vous pouvez toutefois améliorer la présentation et 
Pergonomie de ce module. Il serait d’autre part très intéressant 
que le programme puisse charger un fichier sans en connaître 
d'avance les nombres de champs et d’enregistrements. 


Mode d’emploi de ce module : 


Si vous possédez un lecteur de disquette (CPC 664, 6128 ou 464 + 
DDI1), la sauvegarde se fera immédiatement. Sinon, le message vous 
invitant à appuyer sur la touche PLAY du lecteur de cassette 
apparaîtra peu après la sélection de ce module. Enroulez la 
cassette jusqu’au début du fichier à charger puis appuyez sur la 
touche PLAY. Vous n’avez plus ensuite qu’à appuyer sur une touche 
quelconque pour que le chargement s'effectue. 


MODULE 7 -RECHERCHER- 


Ce module vous permet de rechercher une donnée figurant dans votre 
fichier, un nom ou un numéro de téléphone par exemple. Il vous 
suffit d’indiquer quelle est la donnée que vous voulez retrouver et 
combien de lettres de cette donnée doivent être prises en compte. 
Plus le nombre de lettres significatives est réduit, plus la 
recherche sera rapide mais plus il y aura de chances également que 
la donnée trouvée ne corresponde pas à ce que vous cherchez. 
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1700 CLS 

1710 PRINT STRING$ (450, "-") 

1720 PRINT" RECHERCHER" 

1730 PRINT STRING$ (450, "-") 

1740 LOCATE 5,10: INPUT" Quel est le critere de recherche "icritere$ 
1750 LOCATE 5,11: INPUT" Combien de lettres caracteristiques “ilettres 
1760 PRINT: PRINT: PRINT"La recherche est en cours, veuillez patienter" 
1770 PRINT'ascasaneascesanessossssssesesssssssessesessest 

1780 cherche$=LEFT$(critere$, lettres) 

1790 FÜR enregis=1 TO henregis 

1800 FOR champs=i TO hchanps 

1810 aide$=contenu$ (champs ,enregis) 

1820 trouve$=LEFT$(aidef$, lettres) 

1830 IF cherche$=trouve$ THEN GOTO 1880 

1840 NEXT champs 

1850 NEXT enregis 

1860 INPUT'Ce critere n'a pas ete trouve, faut-il en chercher un autre 
“schoix$ 

1870 IF LEFT#(choix#,1)="n" THEN RETURN ELSE GOTO 1700 

1880 PRINT'Le critere de recherche "icritere#;" se trouve dans Le cha 

p “schanps:" de l'enregistrement ";enregis: INPUT' Rechercher encore une 
fois "schoix$ 

1890 IF LEFT#(choix$,1)="n" THEN RETURN ELSE GOTO 1700 
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Explication du programme: 


1700-1730 
1740-1750 


1760-1770 
1780 


1790-1800 
1810 


1820 


1830 


1840-1850 


1860-1870 


1880-1890 


En-tête du module 
Entrée des informations concernant le critère de 
recherche 


Informations pour l'utilisateur 
Les lettres significatives du critère de recherche 
sont affectées à la variable cherche$ 


Ouverture de la boucle de recherche 
Les divers contenus du fichier sont affectés à la 
variable aide$ 


Les lettres significatives des contenus du fichier 
sont affectées à la variable trouve$ 


Si cherche$=trouve$, la donnée recherchée a été 
trouvée 


Fermeture des deux boucles 

Si le programme n’est pas sorti des boucles, c’est que 
la donnée recherchée n'a pas été trouvée. Un message 
l'indique. Vous pouvez ensuite faire rechercher une 
autre donnée ou retourner au menu 


C'est ici que le programme saute si la donnée 
recherchée a été trouvée. Le critère de recherche 
ainsi que les numéros des champ et enregistrement où 
il a été trouvé sont affichés. Vous pouvez alors faire 
faire une autre recherche ou retourner au menu 


196 


Variables employées: 


critere$ Critère de recherche 

lettres Nombre de lettres significatives 

cherche$ Lettres significatives du critère de recherche 

aide$ Variable auxiliaire à laquelle sont affectés les uns 
après les autres les divers contenus du fichier 

trouve$ Lettres significatives des données du fichier à 
comparer avec cherche 

enregis Nombre d’enregistrements du fichier 

champs Nombre de champs du fichier 

henregis Conserve le nombre d’enregistrements 

hchamps Conserve le nombre de champs 

choix$ Décision oui/non 


Améliorations possibles: 


Il n’est pas nécessaire d'améliorer la routine de recherche qui est 
parfaitement adaptée au CPC et travaille très vite, pour une 
routine BASIC, même avec des masses importantes de données. 

Vous pourriez par contre faire afficher non pas simplement les 
numéros de champ et d’enregistrement de la donnée recherchée mais 
l'enregistrement complet avec le contenu de tous ses champs. Ceci 
est à la portée de tous les programmeurs, y compris les débutants. 


Mode d'emploi de ce module: 


Vous devez entrer d’abord le critère de recherche puis le nombre de 
lettres significatives. Lorsque le programme a trouvé le critère de 
recherche, il affiche les numéros de champ et d’enregistrement 
correspondants. Vous pouvez ensuite, comme pour les autres modules, 
indiquer si vous souhaitez effectuer une nouvelle recherche (touche 
0’) ou retourner au menu. 
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Si le critère de recherche n’a pas été trouvé, le programme vous 
lindique et vous pouvez également indiquer si vous souhaitez 
effectuer une nouvelle recherche (touche ’o’) ou retourner au menu. 


Il peut être intéressant, si votre critère de recherche n’a pas été 
retrouvé d’effectuer une nouvelle recherche avec un nombre 
inférieur de lettres significatives. Ceci peut en effet vous 
permettre de retrouver la donnée que vous cherchez même si vous 
aviez fait une légère faute de frappe lorsque vous l'aviez entrée. 
Il existe d’autre part dans le commerce des programmes comprenant 
des routines de recherche avec une certaine "tolérance d’erreurs" 
mais ces programmes sont en général très onéreux. 
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MODULE 8 -IMPRIMER LE FICHIER- 


Ce module vous permet de faire imprimer votre fichier. 
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1900 CLS 

1910 PRINT STRING$ (450, "-") 

1920 PRINT" IMPRIMER LE FICH 
ER" 

1930 PRINT STRINGS$ (450, *-") 

1940 LOCATE 5,10:PRINT"Veuillez patienter pendant l'iapression du fich 
ier." 

1950 FOR enregis=1 TO henregis 

1960 FOR chanps=1 TO hchaaps 

1970 PRINT#8,contenu$ (chanps enr eqi 5) 

1980 NEXT champs 

1990 NET enregis 

2000 PRINT: INPUT" Voulez-vous une autre impression";choix$ 

2010 IF LEFT$(choix$,1)="n" THEN RETURN ELSE GOTO 1930 


Explication du programme : 





1900-1930 En-tête du module 

1940 Message à l’utilisateur 

1950-1990 Boucle d'impression des données 

2000-2010 Possibilité d'imprimer à nouveau ou retour au menu 


Variables employées : 





enregis Nombre d’enregistrements du fichier 
champs Nombre de champs du fichier 
henregis Conserve le nombre d’enregistrements 
hchamps Conser ve le nombre de champs 


Améliorations possibles : 





La routine actuelle est relativement simple : les données du 
fichier sont imprimées les unes après les autres sans aucun format. 

Une impression formatée afficherait par contre les numéros de champ 
et d’enregistrement ainsi que les noms des champs. Une telle 
impression devrait également prévoir des espaces entre les 
différents enregistrements. Ces modifications sont assez simples à 
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réaliser grâce à l’excellente instruction PRINT USING de votre CPC. 
Nous vous conseillons de lire attentivement la section de votre 
manuel qui est consacrée à cette instruction, ceci vous épargnera 
beaucoup de travail de manipulation avec les fonctions 
alphanumériques (right$, left$ …). 


Mode d'emploi de ce module: 


Le mode d'emploi de ce module ne présente aucune difficulté, il 
vous suffit de répondre aux messages de votre programme. 
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MODULE 9 -FIN DU PROGRAMME- 


Ce module vous permet de mettre fin au programme. 


2020 CLS 
2030 PRINT STRINGS (450 ,"-") 
2040 PRINT" FIN DU PROGRAMME" 


2050 PRINT STRING$ (k90,"-") 
2060 LOCATE 5,10: INPUT'Etes-vous certain de vouloir mettre fin au prog 
ramne";b$:1F LEFT$(b$,1)="o" THEN END ELSE RETURN 


Explication du programme: 


2020-2050 En-tête du module 

2060 On vous demande de confirmer que vous voulez bien 
mettre fin au programme. Si "non", vous retournez au 
menu 


Variables employées: 


b$ Décision oui/non 


Améliorations possibles: 


Les seules améliorations possibles concernent la présentation. 


Mode d’emploi de ce module: 


Le mode d'emploi de ce module ne présente pas non plus de 
difficulté, il vous suffit soit de confirmer que vous voulez mettre 


fin au programme, soit d’indiquer que vous souhaitez revenir au 
menu. 
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MODULE 10 -SUPPRIMER LE FICHIER- 


Ce module vous permet de supprimer des données. Ceci est très utile 
pour vous permettre d’actualiser votre fichier en remplaçant des 
enregistrements dont vous n'avez plus besoin par de nouvelles 
données. Il faut bien sûr toujours être prudent quand on utilise ce 
genre de routine car il est toujours plus rapide de supprimer une 
donnée que de la réinscrire. À cet égard, il est bien sûr très 
intéressant de faire imprimer votre fichier avant de supprimer des 
informations ce qui vous facilitera le travail si vous supprimez 
par erreur des informations dont finalement vous avez toujours 
besoin. 


Explication du programme: 


2070-2120 En-tête du module 

2130-2140 Vous choisissez un des sous-modules 

2150-2200 Routine de suppression de toutes les données avec 
l'instruction CLEAR après vous avoir demandé 
confirmation 


2220-2230 En-tête du sous-module 


2240 Entrée du numéro de l’enregistrement à supprimer 
2250 Ouverture d’une boucle de suppression des champs 
2260 Suppression des données par affectation de chaînes 


vides aux variables de contenu 
2270 Fin de la boucle 


2280-2290 Vous choisissez entre supprimer un autre 
enregistrement et retourner au menu 
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Variables employées: 


enregis Nombre d’enregistrements du fichier 

champs Nombre de champs du fichier 

henregis Conserve le nombre d’enregistrements 

hchamps Conserve le nombre de champs 
contenu$(champs,enregis) Tableau à deux dimensions 


contenant les données du fichier 
choix$ Décision oui/non 


Améliorations possibles: 


IH n'y a pas d’améliorations essentielles à apporter en ce qui 
concerne la suppression complète du fichier. Vous pouvez toutefois 
améliorer la présentation et l’ergonomie de ce module. Par contre, 
en ce qui concerne la suppression sélective, il serait intéressant 
de pouvoir ne supprimer qu’un seul champ d’un enregistrement. Vous 
pourrez certainement réaliser assez aisément cette modification en 
permettant à l'utilisateur d’indiquer le numéro du champ à 
supprimer s'il ne veut pas supprimer la totalité de 
l'enregistrement. 


Mode d'emploi de ce module: 


Vous devez tout d’abord indiquer si vous voulez une suppression 
complète ou sélective de données. 


Si vous choisissez la suppression totale, le programme vous demande 
confirmation. Si vous entrez un "o" les données sont supprimées, 
sinon vous êtes ramené au menu. 


Si vous choisissez la suppression sélective, vous devez entrer le 
numéro de l'enregistrement à supprimer. L'enregistrement une fois 
supprimé, vous pouvez choisir entre une nouvelle suppression et le 
retour au menu. 
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2070 CLS 
2080 PRINT STRINGS (450 ,"-") 


2090 PRINT" ANNULATION" 
2100 PRINT STRINGS (&50,"-") 
2110 LOCATE 10,10:PRINT"Annulation totale sl 


2120 LOCATE 10,11:PRINT"'Annulation d'un enregistrement - 2 -" 

2130 LOCATE 10,14: INPUT"Votre choix :"schoix$ 

2140 IF choix$="2" GOTO 2210 

2150 CLS 

2160 PRINT'Annulation totale" 

2170 PRINT" -------— D 

2180 LOCATE 5,10: INPUT'Etes-vous certain de vouloir tout supprimer";ch 
oix$ 

2190 IF LEFT#(choix$,i)="o" THEN CLEAR 

2200 GOTO 90 

2210 CLS 

2220 PRINT'Annulation d'un enregistrement" 

2230 PRINT '==emmmmemnmmnnmanemmenmmennene È 

2240 LOCATE 5,104: INPUT" Quel enregistrement voulez-vous supprimer “enr 
egis 

2250 FOR champs=i TO hchanps 

2260 contenu$ (champs,enregis)=" 1 

2270 NEXT champs 

2280 LOCATE 5,15: INPUT"Voulez-vous supprimer un autre enregistrement “ 
schoix$ 

2290 IF LEFT$(choix$,1)="o" THEN GOTO 2210 ELSE RETURN 
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7.3 TRAITEMENT DE TEXTE 


Nous vous fournissons dans ce chapitre un second programme 
constituant une application de type professionnel grâce auquel 
votre CPC pourra être plus qu’un simple moyen de vous initier à 
l'informatique, un véritable outil de travail. 


Il s’agit d’une autre application classique depuis de nombreuses 
années des ordinateurs, le traitement de texte. Ce programme vous 
permettra notamment de sauvegarder sur cassette les textes que vous 
avez tapés, de façon à ce que vous puissiez plus tard les 
consulter, les modifier ou les compléter et bien sûr également les 
imprimer. L’intérét du traitement de texte par rapport à la machine 
à écrire est bien sûr également de vous permettre de modifier à 
l'écran toute faute de frappe, sans laisser aucune trace lors de 
l'impression. 


Nous ne nous étendrons pas plus longuement sur les avantages 
considérables que présente le traitement de texte mais nous sommes 
persuadés que vous les découvrirez très vite dès que vous serez 
familiarisé avec ce programme. 


Si notre programme ne peut pas d’une manière générale rivaliser 
avec les traitements de texte commerciaux existant sur d’autres 
ordinateurs, nous pensons qu’il est néammoins très utile et que 
notamment le module d’entrée du texte est assez réussi puisque vous 
pouvez entrer votre texte librement en n'importe quel endroit de 
l'écran ce qui n’est normalement pas le cas pour des programmes 
BASIC de cette taille. 


Comme pour la gestion de fichier nous vous fournissons des 
explications et commentaires détaillés pour chaque partie du 
programme de façon à ce que vous puissiez d’une part utiliser 
aisément notre programme et d’autre part y apporter les 
modifications que vous souhaitez. 
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MODULE 1 -MENU- 


Le menu vous présente les différentes fonctions dont dispose le 
programme en associant un numéro à chacune de ces fonctions. Pour 
sélectionner une fonction, vous tapez le numéro correspondant puis 
vous appuyez sur ENTER. Chaque fois que vous avez fini d’utiliser 
une fonction quelconque du programme vous êtes à nouveau ramené au 
menu. Vous pouvez alors indiquer à l'ordinateur d’exécuter une 
autre tâche. 
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10 REMAHAHEPEEEEEEBEEEHEE 
CÉTÉETETE ES 

20 REMIHHHHNNNINNENEEERRE COO PUY À ON À HEEHREREREEERRR 
ÉTÉTÉTESIL 

30 REMRRERERENNENNNENE À e an CPC 406 4 HER 
HÉRHEREHEE 

40 REMHEHMENNHNNNNNNNE data Decker tit 
HER 

50 REMAHRHHENENHNNENOONE 1984 ANNEE 
PPTÉTIS LL 

60 REMA UN IEUEERENERAE MEET EEE 
CÉTÉTS EL 

70 REM Traitenent de texte version 1.0 (6,6) 

80 REMAEEIEIEIEEEEEEEEEEE EEE EEEEEE 
CÉTPTIETE 

90 DIM contenu$ (82,25) 

100 MODE 2 

110 LOCATE 20,3:PRINT'C  P  C T EX T7" 

120 LOCATE 20,5:PRINT STRINGS (&24,"=") 

130 LOCATE 12,7:PRINT'COPYRIGHT 1984 BY DATA BECKER" 


140 LOCATE 15,10:PRINT" MENU" 

150 LOCATE 15,218 PRINT" ------- 1 

160 LOCATE 15,13:PRINT"Creer un texte =,1? 
170 LOCATE 15,14:PRINT"Examiner le texte -2-—" 
180 LOCATE 15,15:PRINT'Modifier le texte -3-" 
190 LOCATE 15,16:PRINT'Suppriner le texte -4-" 
200 LOCATE 15,17:PRINT"Sauvegarder un texte -5-"' 
210 LOCATE 15,18:PRINT"Charger un texte - 6-" 
220 LOCATE 15,19:PRINT" Imprimer le texte ss 
230 LOCATE 15,20:PRINT"Fin du programe -8-" 
240 PRINT:PRINT: INPUT" Votre choix (1-8) ENTER"; a 


250 ON à GOSUB 260,680,850, 1010, 1080,1240,1390, 1540 
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Explication du programme: 


10-80 Indication du copyright ainsi que du numéro de la 
version du programme 

90 Dimensionnement des variables devant contenir le texte 

100 Passage en mode 80 caractères 

110-230 Edition de la page menu avec l’instruction locate 

240 On vous demande de choisir une des fonctions du 
programme 

250 Saut à la routine que vous avez choisie 


Variables employées: 


a Numéro du module du programme sélectionné 


Mode d’emploi de ce module: 


Entrez le numéro du module sélectionné et appuyez sur ENTER. 


MODULE 2 -CREATION DU TEXTE- 


Ce module vous permet d’entrer votre texte. 

Vous pouvez entrer votre texte librement en utilisant le clavier de 
votre ordinateur comme celui d’une machine à écrire. Le curseur (un 
petit point) vous indique où s’affichera le prochain caractère. 
Vous pouvez déplacer ce curseur avec les touches de contrôle du 
curseur. 
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260 CLS 

270 PRINT STRING$ (&50,"-") 

280 LOCATE 15,3:PRINT'REATION DU TEXTE" 
290 PRINT STRINGS (&50,"-") 

300 LOCATE 10,10: INPUT"Comsent doit s'appeler le texte “snontextef 
310 CLS 

320 ligne=i:colonne=i 

330 PLOT colonnet8+8,400-lignex16+a,i 
340 a$=INKEYS$:IF a$="" GOTO 330 

350 PLOT colonnet8+8,400-1igne*ié+8,0 
360 IF a$=CHR$(13) GOTO 470 

370 IF a$=CHR$(93) GOTO 630 

380 IF a$=CHR$(240) GOTO 510 

390 IF a$=CHR$(24i) GOTO 340 

400 IF a$=CHR$(242) GOTO 570 

410 IF a$=CHR$(243) GOTO 600 

420 colonne=colonneti 

430 IF colonne=80 THEN 60TO 650 

440 contenuf (colonne, ligne) =af$ 

450 LOCATE colanne,ligne:PRINT a$ 

460 GOTO 330 

470 colonne=i 

480 ligne=ligne+i 

490 IF ligne>24 THEN ligne=24 

500 GOTO 330 

510 ligne=ligne-1 

920 IF ligne<i THEN ligne=i 

530 GOTO 330 

940 ligne=ligneti 

590 1F ligne>24 THEN ligne=24 

960 GOTO 330 

970 IF colonne=1 THEN ligne=ligne-1:col onne=00 
590 colonne=colonne-1 

590 GOTO 330 

600 IF colonne=80 THEN ligne=lignetl:colonne=1 
610 colonne=colonne+i 

620 GOTO 330 

650 contenu$ (colonne, ligne) =CHR$ (93) 
640 GOTO 100 

650 ligne=lignetl:colonne=] 

660 IF ligne>24 THEN ligne=24 

670 GOTO 330 
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Explication du programme: 





260 
270-290 
300 
310 
320 


330 


340 
360-410 


420 


430 


440 


450 


460 


Vidage de l’écran 

Edition de l’en-tête du module 

Entrée du nom du texte 

Vidage de l’écran 

Les variables de position ligne et colonne sont 
initialisées à 1. Le curseur se trouve ainsi placé 
dans l’angle supérieur gauche de l’écran. Ces 
variables indiquent ensuite en permanence la position 
du curseur sur l’écran 


Le curseur est placé dans l’emplacement suivant de 
l'écran 


Lecture d’un caractère entré au clavier 

Interrogation respectivement des touches suivantes: 
ENTER, crochet fermé (]) et touches de contrôle du 
curseur. Si vous appuyez sur l’une de ces 6 touches, 
le programme saute à la routine correspondante 


La valeur de la variable colonne est augmentée de 1 
pour qu’elle corresponde à la nouvelle position du 
curseur 


Saut à une routine spéciale si la dernière colonne 
(80) est atteinte 


Le caractère qui a été entré et placé dans a$ est 
transmis à la variable  contenu$(colonne,ligne) 


correspondant à l'emplacement du curseur 


Affichage du caractère dans l’emplacement de l'écran 
qui convient 


Retour pour lire le prochain caractère 
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470-500 


510-530 


540-560 


570-590 


600-620 


630-640 


Routine de traitement de la touche ENTER. Si vous 
appuyez sur cette touche, le curseur saute au début de 
la ligne suivante. La ligne 490 contrôle qu’on ne sort 
pas de l’écran 


Routine de traitement de la touche curseur haut. Si 
vous appuyez sur cette touche, la valeur de la 
variable ligne est diminuée de 1. La ligne 520 
contrôle qu’on ne sort pas de l’écran 


Routine de traitement de la touche curseur bas. Si 
vous appuyez sur cette touche, la valeur de la 
variable ligne est augmentée de 1. La ligne 550 
contrôle qu’on ne sort pas de l’écran 


Routine de traitement de la touche curseur gauche. Si 
vous appuyez sur cette touche, le programme contrôle 
tout d’abord si le curseur ne se trouvait pas en début 
de ligne. Dans ce cas, la valeur de la variable ligne 
est diminuée de 1 et la variable colonne passe à 80. 
Si ce n’est pas le cas, la variable colonne est 
simplement diminuée de 1 


Routine de traitement de la touche curseur droite. Si 
vous appuyez sur cette touche, le programme contrôle 
tout d’abord si le curseur ne se trouvait pas en fin 
de ligne. Dans ce cas, la valeur de la variable ligne 
est augmentée de 1 et la variable colonne passe à 1. 
Si ce n’est pas le cas, la variable colonne est 
simplement augmentée de 1 


Routine de traitement de la touche crochet fermé (]J). 
Un caractère est tout d’abord ajouté dans le dernier 
emplacement du curseur de façon à ce que la fin du 
texte puisse être plus tard localisée. Puis le 
programme saute au menu 
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650-670 Routine de passage à la ligne lorsque vous arrivez en 
écrivant en fin de ligne. La ligne 660 contrôle qu’on 
ne sort pas de l’écran 


Variables employées: 


nomfich$ Nom du texte 


ligne Numéro de ligne actuel du curseur 

colonne Numéro de colonne actuel du curseur 

a$ Contient le dernier caractère entré 
contenu$(colonne,ligne) Contient tout le texte, chaque 


lettre étant définie par ses 
numéros de colonne et de ligne 


Améliorations possibles: 


La routine d’entrée n’a pas en fait à être améliorée notablement. 
Tout au plus pourrait-on essayer d'utiliser plus de touches de 
contrôle, les touches DEL et CLR par exemple. On pourrait par 
exemple avoir une touche qui efface tout le texte à l’écran. 


Il serait cependant possible  d’apporter une amélioration 
substantielle en ce qui concerne la longueur possible du texte. 
Pour le moment le texte ne peut comporter que 24 lignes. Il serait 
donc possible de donner une dimension supérieure à la variable 
contenu$ ainsi qu’à tous les paramètres actuellement fixés à 24. Il 
faut cependant faire attention à ne pas surcharger la mémoire de 
l'ordinateur. Il faudrait également, et c’est déjà plus difficile, 
modifier en conséquence les routines de modification et d'examen du 
texte. 
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Mode d’emploi de ce module: 


Vous devez tout d’abord entrer le nom du texte (lettre à X, lettre 
d'affaire du 2.3.1998, etc..). Vous vous trouvez ensuite dans la 
page d’entrée. Vous pouvez alors entrer votre texte tout à fait 
normalement et utiliser les fonctions suivantes: ENTER pour passer 
au début de la ligne suivante, les touches curseur pour déplacer le 
curseur sur toute la surface de l’écran et enfin crochet fermé pour 
sortir du module d’entrée du texte et retourner au menu. Nous vous 
invitons cependant instamment à ne pas utiliser la touche crochet 
ouvert que nous avons utilisée comme marque automatique de la fin 
du texte entré. 


Les touches DEL et CLR n’ont pas de fonction dans la version 
actuelle du programme mais elles peuvent produire des caractères 
indéfinis si vous les utilisez en liaison avec la touche SHIFT. 
Dans ce cas, il vous suffit de ramener le curseur sur ces 
caractères indésirables et de les effacer avec la touche espace ou 
avec tout autre caractère. 


MODULE 3 -EXAMINER LE TEXTE- 


Ce module vous permet de consulter à l’écran le texte se trouvant 
en mémoire. Ceci vous permet notamment de consulter un texte que 
vous venez juste de charger en mémoire et dont vous ne vous 
rappelez pas exactement mais aussi par exemple, si vous placez 
votre moniteur dans la vitrine de votre magasin, d’afficher un 
texte publicitaire. Songez que dans ce dernier cas il vous sera 
très aisé de modifier régulièrement le texte ainsi exposé. 
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680 CLS 

690 PRINT STRING$ (830, "-") 

700 LOCATE 15,3:PRINT" EXAMNINER LE TEXTE" 
710 PRINT STRING$ (&30,"-") 

720 LOCATE 10,10:PRINT'"Frappez une touche pour examiner le texte" 
730 CALL &BB18 

740 CLS 

730 FOR ligne=1 T0 24 

760 FOR colonne=i TO 80 

770 a$=contenuf (colonne, ligne) 

780 IF a$="" THEN a$=CHR$ (32) 

790 IF a$=CHR$(93) THEN GOTO 830 

795 contenu$ (colonne,ligne)=a$ 

800 LOCATE colonne,ligne:PRINT af 

810 NEXT colonne 

820 NEXT ligne 

830 CALL &BBiB 

840 GOTO 100 
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Explication du programme: 


680 
690-710 
720 
730 


740 
750-760 


770 
780 


790 


795 
800 


810-820 
830 


840 


Vidage de l'écran 

En-tête du module 

Message à l'utilisateur 

Routine qui arrète le programme jusqu’à ce que vous 
appuyiez sur une touche 


Vidage de l’écran 
Ouverture de la boucle permettant d'appeler tous les 
emplacements de l’écran 


La variable a$ reçoit tous les caractères entrés 
Interroge si l’emplacement de l'écran est vide. Si 
oui, un caractère espace y est affiché 


Interroge s’il s’agit du caractère EOF (fin du texte). 
Si oui, fin de l'édition 


Intégration du caractère espace dans le texte 
Affichage du caractère actuel dans l'emplacement qui 
convient 


Fermeture de la boucle 

L'écran est figé tant que vous n’appuyez sur aucune 
touche. Dès que vous appuyez sur une touche, retour au 
menu 


Retour au menu 


Variables employées: 


ligne 
colonne 
a$ 
contenu$ 


Comme au module précédent 
Comme au module précédent 
Comme au module précédent 
Comme au module précédent 
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Mode d’emploi de ce module: 


Vous devez appuyer sur une touche comme un message vous y invite. 
Vous voyez alors le texte apparaître à l’écran et vous n’avez plus 
qu’à appuyer à nouveau sur une touche dès que vous souhaitez 
revenir au Menu. 


Nous vous conseillons vivement de toujours appeler cette routine 


lorsque vous venez d’entrer un texte et avant de faire appel à 
toute autre fonction. 


MODULE 4 -MODIFIER LE TEXTE- 
Ce module vous permet de modifier votre texte. Nous vous invitons à 


lire dans l'explication du programme quelle technique nous avons 
employée pour économiser le plus de place en mémoire possible. 
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850 CLS 

860 PRINT STRING$ (850, "-") 

870 LOCATE 15,3:PRINT" MODIFIER LE TEXTE" 
880 PRINT STRING$ (850 ,"-") 

890 LOCATE 10,10:PRINT"Frappez une touche pour modifier le texte" 
900 CALL &BBI8 

910 CLS 

920 FÜR ligne=1 T0 24 

930 FOR colonne=1 TO 80 

940 a$=contenu$ (colonne, ligne) 

950 IF a$="" THEN a$=CHR$ (32) 

960 IF a$=CHR$(91) THEN GOTO 1000 

970 LOCATE colonne,ligne:PRINT a$ 

980 NEXT colonne 

990 NEXT ligne 


1000 GOTO 320 
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Explication du programme: 


850 
860-880 
890 
900 
910 
920-990 


1000 


Vidage de l’écran 

En-tête du module 

Message à l’utilisateur 

Le programme attend que vous appuyiez sur une touche 
Vidage de l’écran 

Routine d’édition du texte à l’écran 


Saut à la routine d'entrée du module "CREATION DU 
TEXTE". En effet la modification du texte ne nécessite 
aucune fonction qui ne nous soit pas déjà offerte par 
le module d’entrée du texte. Il n’y a donc aucune 
raison de ne pas réutiliser cette routine. 


Nous vous conseillons de toujours concevoir votre 
programme de façon à ce que le plus grand nombre de 
routines possible accomplissent des tâches 
suffisamment générales pour pouvoir être appelées par 
diverses parties de vos programmes. En effet ceci vous 
permet de gagner de la place en mémoire mais également 
de gagner beaucoup de temps lors du développement de 
votre programme. Car d’une part vous avez alors moins 
de lignes à taper et d’autre part, moins vous avez de 
routines différentes dans vos programmes, moins vous 
perdrez de temps lors du dépistage des erreurs qui 
constitue certainement la partie la plus longue et la 
moins agréable du travail de programmation. Cette 
technique est utilisée de manière systématique par les 
programmmeurs professionnels pour qui le temps de 
programmation représente bien sûr de l’argent. 


Variables employées: 


Ce sont les mêmes variables que pour les modules précédents. 
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Améliorations possibles: 


Les améliorations possibles ne seraient pas nécessairement simples 
à mettre en oeuvre et nous vous conseillons de ne vous y attaquer 
que si vous êtes sûr d’avoir bien compris la structure et le 
fonctionnement de l’ensemble du programme. Il s'agirait 
essentiellement de permettre des insertions de texte ou des 
suppressions par une seule commande de mots ou de phrases entiers. 
Le fait que le texte soit stocké dans une seule variable ne rend 
pas celà trop difficile. 


Mode d'emploi de ce module: 


Vous devez d’abord appuyer sur une touche puis vous voyez 
s'afficher le texte à l’écran. Pour le resté vous pouvez vous 
reporter au mode d'emploi du module "CREATION DU TEXTE". Vous 
n'avez donc plus qu’à amener le curseur sur les endroits où vous 
avez fait des fautes de frappe et à réécrire les caractères 
corrects par dessus les lettres erronnées. 
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MODULE 5 -SUPPRIMER LE TEXTE- 


Ce module vous permet de supprimer votre texte si vous vous 
apercevez après l’avoir consulté grâce au module précédent qu’il 
vous est finalement inutile ou qu’il est entièrement à repenser. 


1010 CLS 

1020 PRINT STRINGS (450, "-") 

1030 LOCATE 15,3: PRINT" SUPPRIMER LE TEXTE" 
1040 PRINT STRING$ (&30,"-") 

1050 LOCATE 5,10: INPUT'Etes-vous certain de vouloir supprimer Le texte 
“schoix$ 

1060 IF LEFT$(choix$,1)="a" THEN CLEAR:60T0 1070 

1065 GOTD 100 

1070 RUN 
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Explication du programme: 


1010 
1020-1040 
1050 
1060 
1065 


1070 


Vidage de l’écran 

En-tête du module 

Vous devez confirmer votre décision de supprimer le 
texte 

La variable CLEAR supprime le texte si vous avez 
répondu "o". Le programme saute en 1070 

Si vous ne voulez plus supprimer votre texte, le 
programme saute au menu 

C’est ici que saute le programme si vous avez supprimé 
votre texte. Le programme est relancé pour que soit 
redimensionnée la variable contenu$ qui a été détruite 
par l'instruction CLEAR 


Variables employées: 


choix$ 


Décision oui/non 


Améliorations possibles: 


Il n’y pas ici d'améliorations essentielles à apporter si ce n’est 
en ce qui concerne la présentation. La possibilité de supprimer 
uniquement des parties de texte serait également intéressante mais 
relève plutôt du module modification. 


Mode d'emploi de ce module: 


Vous pouvez confirmer votre décision de supprimer le texte en 
entrant "o" ou retourner au menu en entrant "n". 
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MODULE 6 -SAUVEGARDER LE TEXTE- 


Ce module vous permet de sauvegarder votre texte sur cassette ou 
disquette. Il s’agit là d’un des éléments principaux du programme 
car la possibilité de conserver des textes sous cette forme 
constitue le principal avantage du traitement de texte par rapport 
à la machine à écrire. Vous pouvez en effet, de ce fait, tirer 
autant d'exemplaires que vous voulez de votre texte quand vous le 
voulez. Vous pouvez conserver des modèles de lettres types 
(factures, changement d’adresse, curriculum vitae, etc.) que vous 
pouvez ensuite adapter très aisément à différents correspondants, 
etc. Le traitement de texte constitue d’autre part un mode 
d'archivage très économe en place. 


1080 CLS 

1090 PRINT STRINGS (k50, “-") 

1100 LOCATE 15,3:PRINT" SAUVEGARDER LE TEXT 
E" 

1110 PRINT STRINGS (450, "-") 

1120 LOCATE 10,10:PRINT'Frappez une touche pour sauvegarder le texte" 
1130 CALL &BBIB 

1140 SPEED WRITE 1 

1150 OPENOUT nontexte$ 

1160 FOR ligne=1 TO 24 

1170 FOR colonne=1 TO 80 

1180 a$=contenu$ (colonne, ligne) 

1190 PRINT49,a$ 

1200 NEXT colonne 

1210 NEXT ligne 

1220 CLOSEOUT 

1230 GOTO 100 
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Explication du programme : 


1080 
1090-1100 
1120 
1130 
1140 


1150 


1160-1170 
1180 


1190 
1200-1210 
1220 


Vidage de l’écran 

En-tête du module 

Message à l’utilisateur 

Le programme attend que vous appuyiez sur une touche 
La vitesse d’écriture est augmentée pour que Ja 
sauvegarde ne prenne pas trop de temps. Si vous 
m'utilisez pas des cassettes de bonne qualité il 
vaudrait mieux supprimer cette instruction de façon à 
ce que vos textes ne soient pas perdus. Il n’est 
cependant pas recommandé d’utiliser d’une manière 
générale des cassettes de mauvaise qualité. Le mieux 
est d'éviter d’acheter les cassettes les plus chères 
ou les moins chères et de s’en tenir à des cassettes 
audio ordinaires ou bien à des cassettes spéciales 
informatique. Si vous utilisez des disquettes, le 
problème ne se pose pas. 

Ouverture d’un fichier sur cassette ou disquette avec 
le nom du texte se trouvant en mémoire 

Boucle d'appel de tous les emplacements de l’écran 

La variable a$ stocke successivement tous les 
caractères composant le texte 

Le contenu de la variable est écrit sur la bande 
Fermeture de la boucle 

Fermeture du fichier 


Variables employées : 


ligne 
colonne 
aÿ 
contenu$ 
nomtextef 


Comme précédemment 
Comme précédemment 
Comme précédemment 
Comme précédemment 
Nom du texte 
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Améliorations possibles : 


IH n’y a pas ici d'améliorations essentielles à apporter. Vous 
pouvez toutefois améliorer la présentation et l’ergonomie de ce 
module. Vous pourriez également permettre à l’utilisateur de 
choisir entre les deux vitesses de stockage du texte et lui 
demander, une fois la sauvegarde effectuée s’il souhaite procéder à 
une seconde sauvegarde. 


Mode d’emploi de ce module : 


Si vous possédez un lecteur de disquette (CPC 664, 6128 ou 464 + 
DD1), la sauvegarde se fera immédiatement. Sinon, une fois que vous 
aurez choisi ce module, vous devrez appuyer sur une touche. Le 
programme ouvrira alors un fichier d'écriture sur la bande, ce qui 
durera un certain temps. Le message vous invitant à appuyer sur les 
touches PLAY et RECORD du lecteur de cassette apparaîtra peu après. 
Vous n'aurez plus ensuite qu’à appuyer sur une touche quelconque 
pour que la sauvegarde s'effectue. 
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MODULE 7 -CHARGER UN TEXTE- 


Ce module vous permet de charger les textes que vous avez 
sauvegardés sur cassette ou disquette. 


1240 CLS 

1250 PRINT STRING$ (&50,"-") 

1260 PRINT" CHARGER LE TEXTE" 
1270 PRINT STRINGS (&50, "-") 

1280 LOCATE 10,10: PRINT"Frappez une touche pour charger le texte" 
1290 CALL &BBI8 

1300 OPENIN nontextef 

1310 FOR ligne=1 TO 24 

1320 FOR colonne=1 TO 80 

1330 INPUT#9,a$ 

1340 contenuf (colonne, ligne)=a$ 

1350 NEXT colonne 

1360 NEXT ligne 

1370 CLOSEIN 

1380 GOTO 100 
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Application du programme : 


1240 
1250-1270 
1280 
1290 
1300 


1330 
1340 


1350-1360 
1370 
1380 


Vidage de l’écran 

En-tête du module 

Message à l’utilisateur 

Le programme attend que vous appuyiez sur une touche 
Ouverture d’un fichier sur cassette ou disquette en 
lecture 

Boucle de lecture des données sur la bande 

Les données lues dans a$ sont affectées à la variable 
contenu$ correspondant au bon emplacement sur l’écran 
Fermeture des boucles 

Fermeture du fichier 

Retour au menu 


Variables employées : 


ligne 
colonne 
a$ 
contenu$ 


Comme précédemment 
Comme précédemment 
Comme précédemment 
Comme précédemment 


Améliorations possibles : 


Il n’y a pas ici d'améliorations importantes à apporter. 


Mode d’emploi de ce module : 


Si vous possédez un lecteur de disquette (CPC 664, 6128 ou 464 + 
DD1), la sauvegarde se fera immédiatement. Sinon, le message vous 
invitant à appuyer sur la touche PLAY du lecteur de cassette puis 
sur une autre touche, apparaîtra peu après la sélection de ce 
module. Enroulez la cassette jusqu’au début du texte à charger puis 
appuyez sur la touche PLAY. Vous n'avez plus ensuite qu’à appuyer 
sur une touche quelconque pour que le chargement s’effectue. 
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MODULE 8 -IMPRIMER LE TEXTE- 


Ce module vous permet de faire imprimer votre texte. 


1390 CLS 

1400 PRINT STRINGS (k50,"-") 

1410 PRINT" IMPRIMER LE TEXT 
E" 

1420 PRINT STRING$ (850, "-") 

1430 LOCATE 10,10:PRINT'Frappez une touche pour iaprimer le texte" 
1440 CALL &BB18 

1450 FOR ligne=1 TO 24 

1460 FOR colonne=1 TO 80 

1470 a$=contenu$ (colanne, ligne) 

1480 PRINT#8,a$; 

1490 NEXT colonne 

1495 PRINT #8,CHR$ (13); CHR$ (10) ; 

1500 NEXT ligne 

1510 NEXT champs 

1920 NEXT enregis 

1530 GOTO 100 
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Explication du programme: 


1390 Vidage de l’écran 

1400-1420 En-tête du module 

1430 . Message à l’utilisateur 

1440 Le programme attend que vous appuyiez sur une touche 

1450-1460 Boucle d'impression du texte 

1470 La variable a$ re oit successivement tous les 
caractères à imprimer 

1480 Impression d’un caractère 

1490-1500 Fermeture des boucles 

1495 A la fin de chaque ligne, la tête d'impression est 
ramenée en début de ligne 

1530 Retour au menu 


Variables employées: 


ligne Comme précédemment 
colonne Comme précédemment 
contenu Comme précédemment 
a$ Comme précédemment 
choix$ Comme précédemment 


Améliorations possibles: 


La routine actuelle est relativement simple: les lignes du texte 
sont imprimées les unes après les autres sans aucun format, telles 
que vous les avez entrées. 


Une impression formatée vous permettrait par exemple de faire 
justifier votre texte, c’est-à-dire de faire rajouter 
automatiquement des espaces à l’intérieur des lignes de façon à ce 
que les bords verticaux de votre texte apparaissent alignés et non 
en dent de scie. C’est ainsi que le texte que vous lisez a été 
imprimé. 
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Ceci n’est malheureusement pas très facile à programmer et d’autre 
part très long en BASIC. Nous conseillons donc uniquement aux 
programmeurs expérimentés de s’y attaquer en créant de préférence 
une routine en langage-machine à cet effet. 


Mode d'emploi de ce module: 


Une fois que vous avez appelé ce module, vous devez connecter 
l'imprimante à votre ordinateur et appuyer sur une touche. 
L’impression une fois effectuée vous n’avez plus qu’à indiquer si 
vous voulez une seconde impression ou si vous voulez revenir au 
menu. 
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MODULE 9 -FIN DU PROGRAMME- 


Ce module vous permet de mettre fin au programme. 


1540 CLS 
1550 PRINT STRINGS$ (&50, "-") 
1560 PRINT" FIN DU PROGRAMME" 


1570 PRINT STRINS$ (450, "-") 

1580 LOCATE 5,10: INPUT'Etes-vous certain de vouloir settre fin au prog 
raame"schoix$ 

1590 IF LEFT$(chaix$,1)="o" THEN END ELSE RETURN 
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Explication du programme: 


1540 Vidage de l’écran 

1550-1570 En-tête du module 

1580 On vous demande de confirmer que vous voulez bien 
mettre fin au programme. Si "non", vous retournez au 
menu 


Variables employées: 


choix$ Décision oui/non 


Améliorations possibles: 


Les seules améliorations possibles concernent la présentation. 


Mode d’emploi de ce module: 


Le mode d'emploi de ce module ne présente pas non plus de 
difficulté, il vous suffit soit de confirmer que vous voulez mettre 
fin au programme, soit d’indiquer que vous souhaitez revenir au 
menu. N'oubliez pas que si vous mettez fin au programme, tout texte 
en mémoire que vous n’auriez pas sauvegardé sur cassette sera 
détruit. 
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7.4 ATTRAPEZ LA BOMBE 


Comme vous n’allez certainement pas utiliser votre CPC uniquement 
pour de difficiles travaux, nous avons pensé que vous seriez 
heureux de trouver les deux jeux que nous vous fournissons en guise 
de conclusion de cet ouvrage. Notre premier jeu s'appelle "attrapez 
la bombe" et son principe est tellement simple que vous le 
comprendrez dès l’abord mais vous verrez vite qu’il n’est pas aussi 
facile de gagner que vous pourriez le penser à première vue. 


Il s'agit d'attraper avec un wagonnet les bombes qui tombent du 
ciel. Si vous attrapez la bombe vous marquez un point, sinon vous 
perdez un point. Vous pouvez déterminer au début du jeu la vitesse 
de chute des bombes et le nombre de bombes que vous allez devoir 
attraper. 


Vous déplacez le wagonnet avec les touches curseur gauche et 
droite. 


Faites bien attention en ligne 180 à bien entrer deux espaces après 
l'instruction PRINT. 


La meilleure vitesse pour commencer et 0.5. Mais si vous aimez 


vivre dangeureusement, vous pouvez choisir une vitesse supérieure à 
2: 


Il vaut mieux ne pas interrompre le jeu avec la touche ESC car nous 
avons diminué le délai de répétition des touches et vous aurez 
beaucoup de mal à contrôler votre ordinateur. Attendez plutôt la 
fin d’une partie. 


Encore un conseil pour les lecteurs très courageux: si vous 
modifiez la ligne 160 ainsi: 


160 d=l:anf=int(rnd(1})*30) 
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et la ligne 260 ainsi: 
260 IF ko>30 THEN ko=30 


vous verrez que les bombes tomberont sur une encore plus grande 
largeur horizontale ce qui rend leur “capture” encore plus 
difficile. 


Vous pouvez bien sûr apporter autant de modifications que vous le 
souhaitez à ce petit programme, notamment en améliorant le 
graphisme de l'arrière-plan ou en ajoutant des effets sonores. II 
serait également intéressant de créer des caractères redéfinis vous 
permettant de montrer la bombe qui explose. Vous pourriez alors 
déplacer ces caractères sur l’écran avec l'instruction LOCATE 
lorsque la bombe n’a pas été attrapée. 


234 


10 REM attraPpez la khiombe 
£a MOCE 1 
34 SrMBOL AFTER 


1 


ar 
dn STMEOL 58: 128.192,190.295,295,201.28,8 
29 STMEOL 59.13.93, 200. 260. 14745816 
64 SYMEOL 69,4,8.28,62,127, 127 ÉS, ER 
VA SYMBOL 61,295, 287: 299, 200: 200: 2994 299, 249 
sa IHPUTitesse de chute"ifs 
99 INPUT'"'MHombre de hombes "Ent 


1ä4 SPEELR KEY 1.1 

1iä CLS 

124 kaz14 

134 FOR bombeszi TO bo 

144 CLS 

154 LOCATE 1,22: PRINT STRING AZ, 
164 dal: ant INTE RNOE 1 ER 541 
174 LOCATE anf.d:PRINT" " 

184 LOCATE ko: S1:FRINT" Si" 

194 LOCATE ant, d+fa:PRINT"'E" 
c4g LOCATE ke Si:PEINT" " 

2iBizcitf a 

224 IF INTédi:s24 THEN GOTO 284 
£34 in$=INKE TS 

244 kozkoté 1 AND ing=CHRSrE 243 er 1 AND in$=CHA ge Pad à à 
ESA IF koëi THEH kozl 

269 IF koïeSs THEN koz25 

cr GOT 174 

cs IF kozanf OM anfsko+l TMHEH trastr+i 

296 IF kotranf AND kocïanf-1 THEH tratr-T 

344 HEAT 

318 FLE 

deg SPEED KEY 24,5 

334 LOCATE 15.1G0:PRIMT'ECORE-" tr 

344 LOCATE 14, CA:FRINT'encore une foisr" 

354 INPUT a$ 

364 IF a$gz'o" TMHEH FUH 

ar4 SPEED KEY 24,2% 
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7.5 LA BATAILLE NAVALE 


Voici le deuxième jeu que nous vous avons concocté. Contrairement à 
ce que le titre pourrait faire penser, il ne s’agit pas de la 
millième version de ce jeu très connu. 


Vous devez tout d’abord entrer certains paramètres: 


- le niveau de difficulté du jeu qui doit être compris entre 0 
et 2. Les niveaux 0, 1 et 2 correspondent à des écrans de 20, 
40 ou 80 colonnes. Le niveau 0 est le niveau le plus agréable 
sur le plan de la qualité du graphisme mais C’est bien sûr 
aussi le plus facile. 


- l'unité de temps. Il s’agit du temps dont vous disposez pour 
exécuter votre tâche. Plus ce paramètre est petit, plus votre 
tâche sera difficile car vous disposerez de moins de temps 
pour l’accomplir. 


- la vitesse de déplacement de la bombe sur l’écran 
_- le nombre de bombes avec lesquelles vous voulez jouer 
Il est maintenant temps que nous vous expliquions le but du jeu: 


Une fois que vous avez entrés les paramètres ci-dessus, l’image du 
jeu apparaît. Vous voyez d’une part un bateau ennemi avec un canon, 
d'autre part un sous-marin et une bombe à côté de ce sous-marin. 
Votre tâche consiste à déplacer la bombe avec les touches curseur 
et à l’amener sur le pont du bateau ennemi pour détruire celui-ci. 
Si vous détruisez le bateau dans le temps qui vous est imparti, 
vous marquez des points, sinon l’écran de jeu suivant apparaît. 


A la fin du jeu apparaît une notation de votre prestation qui tient 


compte du nombre de bateaux touchés, du temps que vous avez mis, du 
niveau de difficulté et de la vitesse de la bombe. 
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Vous pouvez bien sûr améliorer ce jeu à votre guise en améliorant 
le graphisme et les effets sonores. Vous pourrez certainement 
puiser de précieuses idées dans les chapitres 2 et 3. 
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MODE 2 

touches=A 

SYMBOL AFTER 32 

LOCATE 20.19:PRINT'EATAILLE 
GOSLIE 358 


LOCATE 1.15: INPUT"'Quel niveau de difficulte (g-2a5";a 
INPUT''Combien d'unites de temPs Four diriger une bombe"ib 


IHPUT'"'Witesse de 13 hombe"isitesse 
IMPUT"Combien de bombes";bombes 


DIM bois bombes 
MODE a 
FOR bb=z1 TO bombes 
CLS 
IF a=4 THEH f=1# 
IF asi THEN fass 
IF a=2 THEM fars 
JP=INTÉ RNDE 1 #24 +2 


KP =INTE RMDE 1 If 41 
AFESINTE RHDE 1 ETS +1 

KP Se TIHTÉ RHONE 1 ES 141 

IF xF=xPS OF aPœupz THEN GÜTO 154 


KPSSMP 2H: UpASUpE 


* bizkhkida 
7 SPEED KEY 1'vitesse 
FOR mnnæl TO bi 


LOCATE xP+2:9p-1:PRIHTMI" 
LOCATE xp, 46 :FRINTIUENXE" 
LOCATE xP2.uP2:PRIHT"IC" 
LOCATE xPS:uPa:FRIHTM " 
in$S=INFE"/$ 


HRPGsrp te 1 AND inbeCHRg 245 ii 1 AMC inéeCHRSe 242 
JPSeyP T4 1 AND ing=CHRSE 241 5-01 AMD inb=eCHRGE 244 


IF xP3<1 THEN xpzzi 

IF xP32f+2 THEM xP3zf+e 

IF 4P3<1 THEH 9P3ci 

IF 9F3225 THEH 9F3225 

IF 4P3ezS AND xPaSf+S THEN F5 f +] 
LOCATE xPS: PS: FRINT"S" 

IF xF3cxP AND yP3zup THEM GCOTO dd 
HEXT rs 
HNEAT bb 
GOTO :66a 
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Ride Dis 


434 FETURH 
d4n MOCE & 
= tone he 


[ H EM: CHP&CE 





452 LIGTE Sa 
453 FOR zei=1 TO 13 






Ed 3 


GOTO 5 

B MÜLE & 

S FOR Ilsi TO bombes 

6 Fointespointe+bolc Il 

7 HEXT 

É Pointsspointektouches#é ÀA+1 0 
4 LOCATE 15.3:FRINT'L E 

A LOCATE £:11:PRIMT"Yaus 
LOCATE 2,13: PRINTUYITRE 
SPEED KEY 20.3 

INPUT "Voulez-vous jouer encore une fois "ichois$ 
IF cho "co" THEH FILM 

EC: 







EST FIHI" 
‘ touches: "touches sur "ibonmbes: "bombes; 
INT Foi 
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LINSRES. A NES TIRE ES GREC 


TRUCS ET ASTUCES POUR 
L'AMSTRAD CPC (TOME 1): 
C'est le livre que tout utilisateur 
d'un CPC doit posseder De nom- 
breux domaines sont couverts (gra- 
phismes. fenetres. langage ma- 
chine) et des super programmes 
sont inclus dans ce best-seller (ges- 
tion de fichiers. editeur de textes et 
de sons. }) 

Ref: ML 112 149F 















! TRUCS ET ASTUCES 
| POUR LES CPC 6128. 654 8 464 





AMSTRAD OUVRE-TOI: Le 
bon depart avec le CPC 464! Ce livre 
vous apporte les principales intor- 
mations sur l'utilisation. les possi- 
biités de connexions du CPC 464 et 
les rudiments nécessaires pour de- 
velopper vos propres programmes 
C'est le livre ideal de tous ceux qui 
veulent penetrer dans l'univers des 
micre-ordinateurs avec le CPC 
Ref : ML 120 99F 








MONTAGES, EXTENSIONS ET 
PERIPHERIQUES AMSTRAD CPC : 
Pour tous les amateurs d'electroni- 
que. ce hivre montre ce que l'on 
peut réaliser avec un CPC. De nom- 
breux schemas et exemples 1lus- 
trent les themes et applications 
abordes comme les interfaces. pro- 
grammateur d'EPROM. Un tres 
beau livre de 450 pages 
Ref ML 131 199F 















LULU 
PATURRRS] 

| MONTAGES, EXTENSIONS 
| ET PERIPHERIQUES DU CPC 





D: 


GRAPHISMES ET SONS : 
L'AMSTRAD CPC dispose de capa- 
cites graphiques et sonores excep- 
tonnelles. Ce livre en montre | utili- 
sation a l'aide de nombreux pro- 
grammes utilitaires 
Ref: ML 124 129F 


















LA BIBLE DU PROGRAMMEUR 
DE L'AMSTRAD CPC : Tout abso- 
lument tout sur le CPC 464 Ce livre 
est l'ouvrage de reference pour tous 
ceux qui veulent programmer en 
pro leur CPC Organisation de la 
memoire. le controleur vidéo. les 
interfaces. l'interpreteur et toute la 














4 Ka 
AM 


SE 


Gino ROM DESASSEMBLEE et COM- 
f + AAA MENTEE sont quelques-uns des 
| themes de cet ouvrage de 700 
! pages 

| Ref ML 122 249F 

Le SR CLEA ER | 


PEEKS ET POKES DU CPC: 
Comment exploiter à fond son CPC 
a partir du BASIC? Cest ce que 
vous revele ce livre avec tout ce 
quil faut savoir sur les peeks 





pokes et autres call Vous saurez À Vies Le \ 

aussi comment proteger la me- AVR 15 Al | 
moire. calculer en binaire et tout RE | 
cela tres facilement DU CPC | 


assure et sans douleur du BASIC au 
puissant LANGAGE MACHINE 


| 
| 
Un passage 
Ref ML 126 99F 
| 


PROGRAMMES BASIC POUR 
LES CPC : Alimentez votre CPC Ce 
livre contient de Supers pro- 
grammes. notamment un désas- 
sembleur. un editeur graphique, un 
editeur de texte Tous les pro- 
grammes sont prêts a être tapes et 
abondamment commentes 
Ref ML 119 129F 


AMuIBAU 


PROGRAMMES a. 
POUR LES CPC 





ea: 


DES IDEES POUR LES CPC: 
Vous n'avez pas d'idees pour utili- 
ser votre CPC (464.664. 6128)? Ce 
livre va vous en donner! Vous trou- 
verez de tres nombreux pro- 
grammés BASIC couvrant des su- fu sh 
jets varies qui transformeront votre AIR JL 
CPC en un bon petit genie De plus 
les programmes vous permettront 
d'approfondir vos connaissances en 
programmation 
Re 132 129F 





| 
| DES IDEES POURIES CPC 


74 








LIVRES AMSTRAD:.CPE 







17 


AMoI HAL) 
o JR 


Pour! TES CPC 464. 664 ET 8120 


N 
\ 


Ret 


t 








« LES ROUTINES DE L'AMS- 
TRAD CPC : Pour bien connaitre et 
utiliser les routines utiles de l'AMS- 
TRAD 6128. 664. 464 A la portee 
de tous Nombreux programmes 


utiitaires. exemples. desassem- 
bleur etc 
Ref ML 143 149F 











EU 
pi 1] 


AM par 


a | 


AU BOUT DES DOIGTS 
CPC 464, 664 et 6128 


T4 





Ret 








, PROGRAMMES ET APPLICA- 
TIONS EDUCATIFS SUR CPC : Ce 
livre est un recueil complet de pro- 
grammes et d'applications prets à 
fonctionner sur CPC Chaque pro- 
gramme est tres bien commente et 
l'ouvrage couvre de nombreux Su- 
jets (mathématiques. chimie } 
Ce livre est tout particulierement 
destine aux lyceens 
Ref : ML 150 179F 


ML 


| 











pers 


- TRUCS ET ASTUCES Il POUR 
CPC: Ce livre concerne tous les 
possesseurs de CPC (464. 664. et 
bien sur 6128!) 
un generateur de menus. un gene- 
rateur de masques. des aides a la 
programmation comme un DUMP 
l'utilisation des routines systemes 
et plein d'astuces de programma- 
tion Pour ceux qui veulent tirer le 
maximum de leur CPC! 

ML 147 


Vous y trouverez 


129 F 









Mur HAL) 


Les ROUTINES DEL AMSTRAD 
CPC 4 T6 





UN 





LE BASIC AU BOUT DES 
DOIGTS CPC: 
introduction complete et didactique 
au BASIC du 
AMSTRAD CPC 464 11 permet d'ap- 
prendre rapidement et facilement la 
programmation ( instructions BA- 
SIC. analyses des problemes algo- 
nthmes complexes 
de nombreux exemples 


Ce hvre est une 


micro-ordinateur 


} Comprenant 
ce livre 


VOUS aSSure un apprentissage SIM- 
ple et efficace du BASIC CPC 
118 


149 F 








AB) 


tt A; 
EDUCATIFS SUR CPE 





tk 











Ref 








DEBUTER AVEC LE CPC 
6128 : Ce livre s'adresse a CEUX qui 
debutent avec le CPC 6128 Tout 
leur est clairement explique aussi 
bien pour le matériel que pour le 
logiciel Une fois leur machine bien 
en main. ils pourront s'attaquer au 
BASIC et utiliser l'utilitaire de ges- 
tion d'adresses que contient Ce 
livre 
Ret 





ML 145 99F 


AMOTRAl RU 











COMMUNICATIONS. MODEM 
ET MINITEL SUR AMSTRAD CPC : 
Un AMSTRAD. un telephone. un 
modem : la combinaison gagnante 
pour entrer dans la telematique 
Aspect théorique : fonctionnement 
d'une interface RS 232. norme Vi- 
deotex. description du fonctionne- 
ment du minitel Aspect pratique : 
description d'une interface serie. 
d'un modem et d'une interface RS 
232 Minitel. Cet ouvrage est egale- 
ment d'une grande utilite aux utili- 
sateurs d'un PCW 
Ref ML 151 149F 


BIEN DÉBUTER AVEC VOTRE | 
CPC 8128 Î 


DL 
COMMUNICATIONS. 


MODEM 
ET MINITEL 


SUR AMSTRAD CPC 


LA BIBLE DU CPC 6646128. 
out connaitre sur les CPC 6128 et 
664 Analyse du systeme d'explor- 
tation. du processeur. le GATE AR. 
RAY. le controleur video. le 8255. 
e chip sonore 
omprend un desassembleur. les 
points d'entree des routines com 
mentés de l'interpreteur et du sys 
teme d'exploitation Un super live 
comme toutes les Bibles ! 
ML 146 199F 


11361 


les interfaces 





| 
| 
| 
| 
| 


JEUX D'AVENTURES. COM- 
MENT LES PROGRAMMER : Voix 
a cle du monde de l'aventure. Ce 
hvre fornit un systeme d'aventures 
complet. avec editeur. interpreteur. 
routines utilitaires et fichiers de 
jeux. Ainsi qu'un generateur da- 


LE AU DA NEMIUREEE {  ventures pour programmer VOUS- 

COMMENT même facilement vos jeux d aven- 
tures. Avec. bien sur. des pro- 
grammes tout prêts à être tapes 
Ret : ML 121 129F 





LIVRES AMSTRAD CPC/PCW 


LE LIVRE DU LOGO : Le LOGO 
est un langage très intéressant dont 
les applications sont très nom- 
breuses. Cet ouvrage permettra au 
lecteur de profiter au maximum du 
LOGO livré avec l'AMSTRAD. Prin- 
cipaux thèmes abordés : les gra- 
phismes, les procédures, les récur- 
sions, les routines de tri, un géné- 
rateur de masques, structure des 
données, intelligence artificielle. 
Réf : ML 162. 149 F. 





LA BIBLE DU GRAPHISME : 
TOUT SUR LE GSX. Ce livre est un 
must. Tout sur le graphisme sur 
CPC et PCW. Vous y trouverez 
notamment : programmation d'un 
logiciel PAINT, graphismes de ges- 
tion ( histogrammes...), gra- 
phismes vectorisés, fonctionne- 
ment et réalisation d'un light pen, 
graphismes en langage machine. Et 
enfin, pour la première fois, des 
explications claires sur le GSX 
Réf : ML 181. 199 F. 

Réf : ML 281. 299 F. 
Le livre + la disquette avec tous les 
programmes. 





ES Es 


LE GRAND LIVRE DU BASIC 


SUR CPC 6128: Ce livre vous 
permet d'exploiter à fond les capa- 
cités du BASIC LOCOMOTIVE 
Théorique et pratique, découvrez 
les bases de la programmation et le 
fonctionnement interne du BASIC. 
et attaquez les différents domaines 
de la programmation : TRIS, FENE- 
TRES, PROTECTION, SONS et MU- 
SIQUE, mémoire de masse avec 
l'AMDOS et le RAMDISK. Nom- 
breux listings d'applications de haut 
niveau fournis et commentés 

Réf : ML 168. 149 F 

Réf : ML 268. 249 F 

Le livre + la disquette avec tous les 
programmes. 





[NyE) 


Fi 
UBHU 


Le Grand Livre 
du Basic 


LE LIVRE DU CP/M AMS- 
TRAD : Ce livre vous permet d'utili- 
ser CP/M sur CPC 464, 664, et 
6128 sans aucune difficulté. Vous y 
trouverez de nombreuses explica- 
tions et les différents exemples 
vous assureront une maîtrise par- 
faite de ce très puissant système 
d'exploitation qu'est CP/M 
Réf : ML 128. 149 F. 





AMI HAL) 
VER 


P M22 
ET CP M PLUS 13,0) 


LE LIVAE OÙ C: 


peu des CPC 464 bot et 6128 











LE LIVRE DU LECTEUR DE 
DISQUETTE AMSTRAD CPC : Tout 
sur la programmation et la gestion 
des données avec le 6128, le DD-1 
ou le 664! Utile au débutant comme 
au programnieur en langage ma- 
chine. Contient un listing du DOS 
commenté, un utilitaire qui ajoute 
les fichiers RELATIFS à l'AMDOS 
avec de nouvelles commandes BA- 
SIC, un MONITEUR disque et beau- 
47] coup d'autres programmes et as- 

tuc 


APR HAU 


es 

LE LIVRE DU LECTEUR 
DE DISQUETTE 

CPC 6128, 654 & 464 


es... 
comment MOTS ML NZ. TAF, 


LE LANGAGE MACHINE DE 
L'AMSTRAD CPC. Ce livre est 
destiné à tous ceux qui désirent 
aller plus loin que le BASIC. Des 
bases de ia programmation en as- 
sembleur à l'utilisation des routines 
système, tout est expliqué avec de 
nombreux exemples. Contient un 
programme assembleur, moniteur 
et désassembleur 
Réf : ML 123. 129F. 





LE LANGAGE MACHINE | 
POUR L AMSTRAD CPC 


BIEN DEBUTER AVEC VOTRE 
PCW : Vous qui venez d'acquérir 
un Amstrad PCW. qui voulez à coup 
sûr réussir vos débuts sur cette 
machine, et tirer rapidement le 
meilleur de ses capacités, voici 
l'ouvrage idéal et indispensable. 
Vous decouvrirez pas à pas le puis- 
sant traitement de texte LOCOS- 
CRIPT, le système d'exploitation 
CP'M, puis la programmation Sous 
BASIC MALLARD, et l'utilisation de 
DR i0G0 
Ref : ML 164 129F 


LE GRAND LIVRE DU PCW: 
Voici l'outil indispensable pour les 
débutants et un « must » pour l'uti- 
lisateur professionnel. Ce livre, clair 
et complet, regroupe notamment 
toutes les possibilités du PCW, et 
répond à vos différentes attentes. Il 
solutionne avec efficacité tous les 
problèmes de programmation et 
d'utilisation du PCW 
Réf : ML 165. 179F 





LOGICIELS A MS TRAD: CPE 


TEXTOMAT : Un Traitement de Texte puissant et simple qui tire partie de toutes les capacités des 
CPC. TEXTOMAT vous permettra d'écrire, d'archiver et de modifier vos courriers, rapports, thèses, 
études. Vous pourrez intégrer dans vos documents des données extraites des fichiers DATAMAT #t 
des calculs réalisés par CALCUMAT : Utilisation aisée à partir de menus, jeu de caractères français 
complet accentué, fonction de calcul en mode texte, jusqu'à 16640 caractères, possibilité de chainage 
de textes sur disquette, fonctionne en mode 80 caractères avec accents, travaille avec un ou deut 
lecteurs de disquettes, choix des couleurs écran-caractères-bordure, mode Insertion-Gomme..., 
tabulation, numérotation des pages, impression proportionnelle avec table d'espacements redéfinis- 
sable, caractères de contrôle librement définissable (soulignage, double épaisseur.….), lettre type avec 
insertion automatique (adresses par exemple), formatage des textes à l'écran, adaptation à tout type 
d'imprimante, manuel détaillé et didactique, fonctionne sur 464, 664 et 6128. Spécifications 
Techniques : 3 Modes, Mode texte, Mode Commande : 13 ordres, Mode Menu : 33 ordres. 

Réf AM 305. 450 F. Version Disquette. 











DATAMAT : DATAMAT permet de tenir à jour et d'exploiter tous vos fichiers. De plus relié à 
CALCUMAT vous pourrez reprendre le° données de vos fichiers pour établir des calculs et des graphes 
{par exemple : répartition géographique de vos clients, histogramme des ventes). Relié à 
TEXTOMAT vous pourrez intégrer vos données pour réaliser des mailings, courrier personnalisé etc… 
Spécifications techniques : Emploi extrêmement simple dû à l'utilisation de menus, traite tout type de 
données, définition d'un masque de saisie personnalisé, 40 ou 80 caractères par ligne, fonction de 
recopie d'écran sur imprimante, 50 champs par enregistrement, 512 caractères par enregistrement, 
jusqu'à 4000 enregistrements par fichier, définition des couleurs écran-bordure-caractère, utilisation 
des fichiers avec TEXTOMAT (mailing. relances..….), fonctionne avec un ou deux lecteurs de 
disquettes, entièrement écrit en langage machine : extrêmement rapide, adaptable à tout type 
d'imprimante, jeu de caractères français accentué complet (ou anglais), programme principal en 
mémoire : pas d'attente de chargement, manuel d'utilisation complet en français, impression 
d'étiquettes, DATAMAT fonctionne sur CPC 464, 664 et 6128. 

Réf AM304. 450 F. Version disquette 








CALCUMAT : CALCUMAT est un tableur graphique de qualité professionnelle. Il se compose 
principalement d'une grille de calcul, d'un calepin, d'une calculatrice, d'un presse papier et d'un 
module permettant la représentation graphique d'un ensemble de données. CALCUMAT s'utilise très 
simplement à l'aide de menus déroulants et de fenêtres de travail. 

PRINCIPALES FONCTIONS DE CALCUMAT : Tri numérique ou alphanumérique d'un ensemble de 
cellule, fonctions « couper, copier, coller » pour manipuler un ensemble de cellules par l'intermé- 
diaire du presse papier, calculs en mode automatique ou sur demande, représentation graphique en 
barres. lignes, ou camembert, de quatre zones de données, recopie d'écran graphique sur imprimante 








j TA AMSTRAD DMP 1, DMP 2000. et compatibles Epson, transfert de données de DATAMAT vers 
DEL TE CALCUMAT pour effectuer des calculs sur les zones numériques d'un fichier, transfert de données de 
! i Les CALCUMAT vers TEXTOMAT pour impressions de lettres circulaires, calepin avec éditeur plein écran 
| ÉOoN : permettant l'impression de textes et de valeurs contenues dans la grille de calcul. 
204 EeA SOUS CARACTERISTIQUES DE CALCUMAT : Grille de calcul de 256 colonnes sur 1024 lignes maximum, 
? capacite de 20 Ko de mémoire pour le stockage des données, longueur maximum d'une formule de 
LENS . . + calcul de 100 caractères, largeur des colonnes redéfinissables séparément. 


TT Ref AM 311. 450 F. Version disquette 





“LA SOLUTION : LA SOLUTION c'est votre solution bureautique complète sur AMSTRAD CPC. En 
effet ce package regroupe trois logiciels (Traitement de Texte, Gestion de Fichiers et Tableur 
Graphique) complémentaires et homogènes qui vous permettront de traiter efficacement toutes vos 
tâches de bureau (rapport, courrier, tenue des fichiers. publipostage, calculs prévisionnels, 
graphismes de gestion.….). Les trois logiciels pouvant s'échanger leurs données, les possibilités 
offertes par la SOLUTION sont très vastes : on pourra par exemple réaliser un mailing à partir du 
Traitement de Texte en reprenant les adresses séléctionnées par la Gestion de Fichiers en insérant 
dans le texte un tableau de prévisions réalisé par le Tableur. La documentation comprend un exemple 
complet d'une application utilisant les trois logiciels. 

Réf AM 313 Prix 950 F. 








LOC VELS AMSTRAD UECPE 


 SUPERPAINT : logiciel utilitaire de création graphique . SUPERPAINT fait partie de la nouvelle 
génération de logiciels qui utilisent la technique des icônes et des menus deroulants La selection des 
outils, des motifs, des fonctions ainsi que le dessin lui-même se font a l'aide d'un joystick ou d'une 
souris. SUPERPAINT travaille sur des feuilles de format A4 et ne visualise qu'une partie du dessin à 
l'écran de travail. Principaux outils de SUPERPAINT : Pinceau. crayon, gomme. régle, pot de 
peinture, bombe à laquer, trace cercle et éllipses, trace rectangles. trace polygones. curseur de 
texte … Toutes les formes peuvent être colorées ou tramées à l'aide de motifs. Principales fonctions 
de SUPERPAINT 

- ZOOM d'une partie du dessin pour modifications de pixels au crayon 

- Saisie de figures au lasso pour déplacements. copies, rotations. effets de miroir, contours 

- Fonctions « couper, copier. coller » pour sauvegarde ou integration de parties de dessins 

- Grille pour déplacement des outils pas à pas 

Réf : AM 309. 395 F. version disquette uniquement 








*  D.AM.S.: (CPC 464,664 et 6128) D.A.M.S intégre un assembleur, un moniteur et un 
désassembleur symbolique pour développer et mettre au point facilement des programmes en langage 
machine sur AMSTRAD. Les trois modules sont co-résidents en mémoire ce qui assure une grande 
souplesse d'utilisation. Vous pouvez notamment utiliser un éditeur plein écran, un assembleur 
immédiat, un désassembleur symbolique, une trace et beaucoup d'autres forictions tres puissantes 
D.A.M.S est entièrement relogeable et est écrit en langage machine. L'éditeur est du type plein écran 
et sans numéro de ligne. Des commandes spéciales permettent la recherche ou la substitution de 
mots de phrases. l'effacement . la duplication et le déplacement de blocs de texte. L'assembleur Z80 
est doté de pseudos instructions d'assemblage telles que IF. THEN, ELSE, et DEFB. DEFW. Il permet 
l'assemblage de plusieurs blocs de texte source. La table des labels génerée peut être ensuite utilisée 
par le moniteur, le désassembleur et le mode trace. Le moniteur comprend plus de 15 commandes 
pour utiliser trace, dump, affichage et modification des registres, exécution d'un programme Le 
désassembleur peut créer du texte source à partir d'un programme en langage machine avec 
génération automatique de labels et DEFB... Le source peut être modifie a partir de l'éditeur et 
réassemblé. La trace comprend un mode rapide pour mettre au point des routines importantes 
Chaque instruction est analysée avant son exécution pour éviter tout blocage système. D A MS est 
entièrement autonome. 

Réf : AM 208. 295 F. (version cassette). Réf : AM 308. 395 F. (version disquette) 








*  AUTOFORMATION A L'ASSEMBLEUR : LE LANGAGE MACHINE À LA PORTEE DE TOUS 


<æ 
: € Contient unlivre et un logiciel 
/ Le livre : 
Cet ouvrage introduit le débutant à la programmation du Z80 en utilisant la methode du Dr WATSON 
qui selon les critiques vaut son pesant d'or ! Aucune connaissance préalable n'est requise et le but du 
AMSTRAD livre est d'assurer un succès total au novice. À la fin du livre les instructions du Z80 sont expliquées en 
détail. De nombreux exemples illustrent les différentes étapes au cours alors que les exercices (les 
AUTOFORMATION solutions sont fournies) testent la compréhension. D'autres chapitres montrent comment de nouvelles 
À L'ASSEMBLEUR commandes peuvent être ajoutées au BASIC, notamment une routine de traçage de CERCLE 
Le togiciel : 
[A] FRANÇAIS Un assembleur Z80 complet est livré sur cassette et comprend : 


- Etiquettes Symboliques. 

- Directives d'assemblage 

- Chargement/Sauvegarde 

- Cpoie d'Ecran. 

- INSERT/DELET. 

L'assembleur permet d'écrire des programmes facilement en langage d'assemblage puis les 
transforme en code machine (langage machine). Pour vous aider à comprendre les notations 
mathématiques utilisées, une démonstration de l'utilisation des nombres binaires et hexadécimaux est 
fournie. Un programmes utilisant les commandes graphiques additionnelles décrites dans le livre est 
également fourni. 

Réf : ML 226. 195 F. Version cassette Ref : ML 326. 295 F. (Version disquette) 





LOGICIELS AMSTRAD: PCM 





DATAMAT PCW : Enfin une gestion de fichiers simple, rapide et puissante pour votre PCW 
Grâce à son système de saisie et ses touches de fonction définissables, DATAMAT PCW est très facile 
à utiliser. En exploitant au maximum les capacités de votre PCW, le système de recherche et les 
méthodes d'accès sophistiquées de DATAMAT PCW vous assurent une gestion rapide et efficace de 
vos données. Avec la puissance de programmation de DATAMAT PCW, reliez différents formulaires 
entre eux, effectuez des calculs arithmétiques et utilisez jusqu'à 83 zones de saisie réparties sur 9 
pages écran par fichier. 

- Permet de créer 32767 enregistrements par fichier. 

- L'utilisateur peut créer lui-même ses formulaires de saisie 

- Permet de relier des fichiers entre eux afin de transférer des données d'un fichier à un autre. 

- Possibilité d'effectuer des calculs sur les zones de saisie (addition, multiplication...). 

- Le format d'impression peut être modifié (impression en liste, justification à droite ou à gauche, en- 
tête.) 

- Chaque zone de saisie peut être un index. 

Réf : AM 316. 590 F 





PCW GRAPH : Le logiciel graphique spécialement mis au point pour votre PCW et qui exploite de 





façon optimale les capacités de votre machine. PCW GRAPH vous permet de créer des histogrammes 
de présentations variées, pour visualiser et synthétiser les résultats de vos applications ou des 
logiciels que vous utilisez. En effet, tous les logiciels générant des fichiers au format ASCII et la 
plupart le permette, peuvent communiquer leurs données à PCW GRAPH. Ainsi, par exemple, vous 
est-il possible d'afficher simultanément quatre représentations graphiques d'un tableau créé sur 
MULTIPLAN. 

- 1 à 4 graphiques directement à l'écran 

- Editeur de texte pour ajouter des commentaires aux graphiques 

- Sept ne de représentation graphique (barres, barres 3D, cumuls, cumuls 3D, lignes, surfaces et 
secteurs 

- 2 échelles pour la sortie vers l'imprimante, dont une en pleine page 

- Possibilité d'affichage des légendes et d'une grille de référence. 

Réf : AM 315. 395 F 
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AUTOFORMATION A L'ASSEMBLEUR SUR PCW : UN LIVRE + UN LOGICIEL. Ce livre permet au 


novice de maîtriser la programmation Z 80 grâce à la méthode efficace du Dr WATSON. De nombreux 
exemples illustrent les différentes étapes, et des exercices (les solutions sont fournies) testent la 
compréhension et peuvent être directement essayés avec le logiciel. Ce logiciel est composé d'un 
assembleur, d'un désassembleur et d'un programme d'exemples. Avec l'assembleur créez des 


Réf : ML 426 295 F 





programmes en langage machine pouvant être utilisés directement sous CP:M 





dB COMPILER : dB COMPILER : un compilateur pour dBASE Il! dB COMPILER traduit votre 
programme écrit sous dBASE 11 en un jeu d'instructions proche du « langage machine » (donc très 
rapide) et pouvant être exécuté indépendamment de dBASE II. dB COMPILER est le premier 
compilateur pour dBASE Il, le leader des SGBD sur AMSTRAD PCW. dB COMPILER permet de faire 
fonctionner vos applications dBASE 11 sans dBASE Il. Celles-ci peuvent être diffusées librement sans 
aucune redevance à payer 
Les avantages de dB COMPILER : 
- Simplicité d'emploi 
- Pas de redevance 
- Protection du code source 
- Indépendance de dBASE 1 
- Accroissement de la vitesse d'exécution (jusqu'à 10 fois plus rapide !} 
- Gestion entièrement automatique de la mémoire 
- Facilité de maintenance des programmes source 
- Fonctionne sous CP/M Plus 
- Gestion complète du dispatching des fichiers 
- Calculs sur 30 chiffres 
- Correction de certaines anomalies de dBASE I] 
Avec dB COMPILER, votre application fonctionnera plus rapidement et indépendamment de dBASE II 
Réf : AM 312. 790 F 
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CE LIVRE VOUS PASSIONNE, 
MAIS VOUS N’AVEZ PAS LE TEMPS 
DE TAPER LES PROGRAMMES 
ACHETEZ LA DISQUETTE 
DES PROGRAMMES DU LIVRE 


TRUCS ET ASTUCES AMSTRAD CPC ET 6128! 
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Ce livre est l'indispensable compagnon de votre AMSTRAD CPC. Il vous 
dévoile de nombreux trucs et astuces et vous fournit une quantité de 
programmes fort utiles comme un éditeur de texte, un moniteur... Les 
principales adresses de l’'AMSTRAD sont commentées et le livre guide 
également vos premiers pas vers le langage machine. 


CONTENU : 


Structure Hardware 

Système d'exploitation 

Tokens BASIC 

Dessin avec joystick 

Technique et applications des fenêtres 
— Programme complet de gestion fichier 
— Editeur de son 
— Générateur de caractères 
— Listings détaillés de jeux passionnants 
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